X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FHelper.pm;h=421a69efdec535f3f354d2aa7b84a91f4a796084;hb=7cf46fb4e1b259bdafbef121cd9940abd31e769d;hp=57a5a2da5a0d2e245bfffce5f446a47604af1948;hpb=8565f89d2f95ab6b5383faee6497609dc2480e03;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Helper.pm b/lib/Catalyst/Helper.pm index 57a5a2d..421a69e 100644 --- a/lib/Catalyst/Helper.pm +++ b/lib/Catalyst/Helper.pm @@ -117,7 +117,6 @@ sub mk_component { || eval { @{ [ getpwuid($<) ] }[6] } || 'A clever guy'; $self->{base} ||= File::Spec->catdir( $FindBin::Bin, '..' ); - die $self->{base}; unless ( $_[0] =~ /^(?:model|view|controller)$/i ) { my $helper = shift; my @args = @_; @@ -607,7 +606,7 @@ license('perl'); include('ExtUtils::AutoInstall'); -requires( Catalyst => '5.58' ); +requires( Catalyst => '5.60' ); catalyst_files(); @@ -623,7 +622,7 @@ This file documents the revision history for Perl extension [% name %]. - initial revision, generated by Catalyst __apptest__ use Test::More tests => 2; -use_ok( Catalyst::Test, '[% name %]' ); +BEGIN { use_ok( Catalyst::Test, '[% name %]' ); } ok( request('/')->is_success ); __podtest__ @@ -804,6 +803,8 @@ if ( $debug ) { $ENV{CATALYST_DEBUG} = 1; } +# This is require instead of use so that the engine may be +# changed above for Restarter support. require [% name %]; [% name %]->run( $port, $host, {