X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FHelper.pm;h=4485b8a30f8e58049650bb9b494250ab4951f950;hb=098e9288719fb9dfe5b6d0ecfbb90cfad6f1a865;hp=a020ed8d1f2333359cf8955ee59735fbe48c3e76;hpb=d4bcc27ad6965338c0bc0189df25c0047b63d87f;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index a020ed8..4485b8a 100644 --- 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%] @@ -793,7 +795,7 @@ Catalyst component. [% IF type == 'C' %] =head1 METHODS -=over4 +=over 4 =item default @@ -803,6 +805,8 @@ sub default : Private { my ( $self, $c ) = @_; $c->res->output('Congratulations, [% class %] is on Catalyst!'); } + +=back [% END %] =head1 AUTHOR