[Catalyst-commits] r11828 - Catalyst-Manual/5.80/trunk/lib/Catalyst/Manual

hkclark at dev.catalyst.perl.org hkclark at dev.catalyst.perl.org
Sun Nov 15 00:00:32 GMT 2009


Author: hkclark
Date: 2009-11-15 00:00:31 +0000 (Sun, 15 Nov 2009)
New Revision: 11828

Modified:
   Catalyst-Manual/5.80/trunk/lib/Catalyst/Manual/Intro.pod
Log:
Fix indenting issue (with thanks to Kiffin Gish)

Modified: Catalyst-Manual/5.80/trunk/lib/Catalyst/Manual/Intro.pod
===================================================================
--- Catalyst-Manual/5.80/trunk/lib/Catalyst/Manual/Intro.pod	2009-11-14 17:37:07 UTC (rev 11827)
+++ Catalyst-Manual/5.80/trunk/lib/Catalyst/Manual/Intro.pod	2009-11-15 00:00:31 UTC (rev 11828)
@@ -1311,17 +1311,17 @@
 If you don't want or need these features then it's perfectly acceptable
 (and faster) to do something like this:
 
-sub hello : Global {
-    my ( $self, $c ) = @_;
-    $c->stash->{message} = 'Hello World!';
-    $self->check_message( $c, 'test1' );
-}
+    sub hello : Global {
+        my ( $self, $c ) = @_;
+        $c->stash->{message} = 'Hello World!';
+        $self->check_message( $c, 'test1' );
+    }
+    
+    sub check_message {
+        my ( $self, $c, $first_argument ) = @_;
+        # do something...
+    }
 
-sub check_message {
-    my ( $self, $c, $first_argument ) = @_;
-    # do something...
-}
-
 Note that C<forward> returns to the calling action and continues
 processing after the action finishes. If you want all further processing
 in the calling action to stop, use C<detach> instead, which will execute




More information about the Catalyst-commits mailing list