From: Marcus Ramberg Date: Thu, 23 Jun 2005 18:47:45 +0000 (+0000) Subject: minor pod fix to make tests pass. X-Git-Tag: 5.7099_04~1294 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=7dcb4831027234fcb0b401addaab9332bd5211eb minor pod fix to make tests pass. --- diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index cca4dd1..a717bee 100644 --- a/lib/Catalyst/Helper.pm +++ b/lib/Catalyst/Helper.pm @@ -64,7 +64,7 @@ sub mk_app { $self->{appprefix} = lc $self->{dir}; $self->{appprefix} =~ s/-/_/g; $self->{startperl} = $Config{startperl}; - $self->{scriptgen} = $Catalyst::CATALYST_SCRIPT_GEN; + $self->{scriptgen} = $Catalyst::CATALYST_SCRIPT_GEN || 4; $self->{author} = $self->{author} = $ENV{'AUTHOR'} || eval { @{ [ getpwuid($<) ] }[6] } || 'Catalyst developer'; @@ -830,6 +830,7 @@ sub default : Private { } =back + [% END %] =head1 AUTHOR