X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FScript%2FTest.pm;h=ed4ad64865ad6c138f6cd3f652df52ca047f8c37;hb=70dc1717c4f61c6ddac1f2524d81e1812b94d810;hp=8431fd2b3871119c8dd3254203b4d3da06a2b15e;hpb=451b2a4432a971fe5d12e108545677eb94295fab;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Script/Test.pm b/lib/Catalyst/Script/Test.pm index 8431fd2..ed4ad64 100644 --- a/lib/Catalyst/Script/Test.pm +++ b/lib/Catalyst/Script/Test.pm @@ -4,7 +4,7 @@ use Pod::Usage; use FindBin; use lib "$FindBin::Bin/../lib"; with 'MooseX::Getopt'; -use namespace::clean -except => [ qw(meta) ]; +use namespace::autoclean -except => [ qw(meta) ]; has app => ( isa => 'Str', is => 'ro', required => 1 ); has help => ( isa => 'Bool', is => 'ro', required => 0, default => sub { 0 } ); @@ -15,10 +15,10 @@ sub run { Class::MOP::load_class("Catalyst::Test"); Catalyst::Test->import($self->app); - + pod2usage(1) if ( $self->help || !$ARGV[1] ); print request($ARGV[1])->content . "\n"; - + } 1;