[Catalyst-commits] r8821 - trunk/examples/CatalystAdvent/root/2008

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2008-12-11 07:52:41 +0000 (Thu, 11 Dec 2008)
New Revision: 8821

Modified:
   trunk/examples/CatalystAdvent/root/2008/10.pod
Log:
Add Moose to get method modifiers, fix after modifier

Modified: trunk/examples/CatalystAdvent/root/2008/10.pod
===================================================================
--- trunk/examples/CatalystAdvent/root/2008/10.pod	2008-12-11 01:20:47 UTC (rev 8820)
+++ trunk/examples/CatalystAdvent/root/2008/10.pod	2008-12-11 07:52:41 UTC (rev 8821)
@@ -36,11 +36,12 @@
 can't be bogus without leading to problems), or if need to know the
 length of the array without cumbersome workarounds. Enter L<Moose>:
 
-
- setup => sub {
+ use Moose;
+ after 'setup' => sub {
      use Moose::Autobox;
      $_[0]->config->{some_values}{want_an_array} = [ $_[0]->config->{some_values}{want_an_array}->flatten ];
- }
+ };
+ no Moose;
 
 Place this solution in MyApp.pm and the problem is fixed!