reverted latest path from Andy Grundman

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Helper.pm

diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm
index a020ed8..e8ad1d5 100644 (file)
--- a/lib/Catalyst/Helper.pm
+++ b/lib/Catalyst/Helper.pm
@@ -66,7 +66,7 @@ sub mk_app {
     $self->{scriptgen} = $Catalyst::CATALYST_SCRIPT_GEN;
     $self->{author}    = $self->{author} = $ENV{'AUTHOR'}
       || eval { @{ [ getpwuid($<) ] }[6] }
-      || 'A clever guy';
+      || 'Catalyst developer';
     $self->_mk_dirs;
     $self->_mk_appclass;
     $self->_mk_build;
@@ -430,7 +430,7 @@ Catalyst based application.
 
 =head1 METHODS
 
-=over4
+=over 4
 
 =item default
 
@@ -441,6 +441,8 @@ sub default : Private {
     $c->res->output('Congratulations, [% name %] is on Catalyst!');
 }
 
+=back
+
 =head1 AUTHOR
 
 [%author%]
@@ -498,7 +500,7 @@ my $build = Catalyst::Build->new(
 );
 $build->create_build_script;
 __readme__
-Run script/[% apprefix %]_server.pl to test the application.
+Run script/[% appprefix %]_server.pl to test the application.
 __changes__
 This file documents the revision history for Perl extension [% name %].
 0.01  [% time %]
@@ -793,7 +795,7 @@ Catalyst component.
 [% IF type == 'C' %]
 =head1 METHODS
 
-=over4
+=over 4
 
 =item default
 
@@ -803,6 +805,9 @@ sub default : Private {
     my ( $self, $c ) = @_;
     $c->res->output('Congratulations, [% class %] is on Catalyst!');
 }
+
+=back
+
 [% END %]
 =head1 AUTHOR