use IO::File;
use FindBin;
use Template;
-our $CATALYST_SCRIPT_GEN = 2;
+use Catalyst;
my %cache;
$self->{dir} = $name;
$self->{dir} =~ s/\:\:/-/g;
$self->{startperl} = $Config{startperl};
- $self->{scriptgen}=$CATALYST_SCRIPT_GEN;
+ $self->{scriptgen}=$Catalyst::CATALYST_SCRIPT_GEN;
$self->{author}=$self->{author} = $ENV{'AUTHOR'} ||
@{[getpwuid($<)]}[6];
$self->_mk_dirs;
Run script/server.pl to test the application.
__changes__
-This file documents the revision history for Perl extension $name.
+This file documents the revision history for Perl extension [% name %].
0.01 [% time %]
- initial revision, generated by Catalyst