X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FHelper.pm;h=14af0d1a9a82468f935d07457be58d1817f50ea5;hp=0f2de200b4f2d383d49abf4dd3bb3bf38ff67e78;hb=ab2374d3a68f4d44601813f351b38222822b7c39;hpb=37553dc8c4a1b2113be2f2bc7b3bb701f76bb524 diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index 0f2de20..14af0d1 100644 --- a/lib/Catalyst/Helper.pm +++ b/lib/Catalyst/Helper.pm @@ -463,7 +463,7 @@ sub default : Private { my ( $self, $c ) = @_; # Hello World - $c->response->output('Congratulations, [% name %] is on Catalyst!'); + $c->response->output( $c->welcome_message ); } #=item end @@ -661,6 +661,8 @@ my $restart = 0; my $restart_delay = 1; my $restart_regex = '\.yml$|\.yaml$|\.pm$'; +my @argv = @ARGV; + GetOptions( 'fork' => \$fork, 'help|?' => \$help, @@ -674,6 +676,7 @@ GetOptions( pod2usage(1) if $help; [% name %]->run( $port, $host, { + argv => \@argv, 'fork' => $fork, restart => $restart, restart_delay => $restart_delay,