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=183ce2fcbd348a3f4311c14fb283135e2867fbf8;hp=fe2b3aca09c6ef7361086906d69d677a4704e904;hb=fcddc3bf434c762e3e213db375edbbda1a77c5b5;hpb=6e21b052948c5287602d94f6341b665fa050985c diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index fe2b3ac..183ce2f 100644 --- a/lib/Catalyst/Helper.pm +++ b/lib/Catalyst/Helper.pm @@ -651,7 +651,7 @@ plan skip_all => 'set TEST_POD to enable this test' unless $ENV{TEST_POD}; all_pod_coverage_ok(); __cgi__ -[% startperl %] -w +[% startperl %] BEGIN { $ENV{CATALYST_ENGINE} ||= 'CGI' } @@ -689,7 +689,7 @@ it under the same terms as Perl itself. =cut __fastcgi__ -[% startperl %] -w +[% startperl %] BEGIN { $ENV{CATALYST_ENGINE} ||= 'FastCGI' } @@ -758,7 +758,7 @@ it under the same terms as Perl itself. =cut __server__ -[% startperl %] -w +[% startperl %] BEGIN { $ENV{CATALYST_ENGINE} ||= 'HTTP'; @@ -861,7 +861,7 @@ it under the same terms as Perl itself. =cut __test__ -[% startperl %] -w +[% startperl %] use strict; use Getopt::Long; @@ -916,7 +916,7 @@ it under the same terms as Perl itself. =cut __create__ -[% startperl %] -w +[% startperl %] use strict; use Getopt::Long; @@ -989,7 +989,7 @@ it under the same terms as Perl itself. =cut __package__ -[% startperl %] -w +[% startperl %] use strict; use Getopt::Long;