Fixed: Invalid sub names in intro

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Manual / Intro.pod

diff --git a/lib/Catalyst/Manual/Intro.pod b/lib/Catalyst/Manual/Intro.pod
index 407daa7..8e58d7f 100644 (file)
--- a/lib/Catalyst/Manual/Intro.pod
+++ b/lib/Catalyst/Manual/Intro.pod
@@ -234,10 +234,10 @@ The last of these, the stash, is a universal hash for sharing data among applica
     sub hello : Global {
         my ( $self, $c ) = @_;
         $c->stash->{message} = 'Hello World!';
-        $c->forward('show-message');
+        $c->forward('show_message');
     }
 
-    sub show-message : Private {
+    sub show_message : Private {
         my ( $self, $c ) = @_;
         $c->res->output( $c->stash->{message} );
     }
@@ -339,7 +339,7 @@ but before your action is processed.
 
   MyApp::begin
   MyApp::auto
-  MyApp::default
+  MyApp::C::Foo::default
   MyApp::end
 
 =item for a request for /foo/bar/foo
@@ -399,16 +399,16 @@ You control the application flow with the C<forward> method, which accepts the k
     sub hello : Global {
         my ( $self, $c ) = @_;
         $c->stash->{message} = 'Hello World!';
-        $c->forward('check-message');
+        $c->forward('check_message');
     }
 
-    sub check-message : Private {
+    sub check_message : Private {
         my ( $self, $c ) = @_;
         return unless $c->stash->{message};
-        $c->forward('show-message');
+        $c->forward('show_message');
     }
 
-    sub show-message : Private {
+    sub show_message : Private {
         my ( $self, $c ) = @_;
         $c->res->output( $c->stash->{message} );
     }