X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FScript%2FTest.pm;h=268b1cdcb65332b55b0f09e3caad41cde82e0ae6;hb=3a8c155fa0077e949f68f29fbe4b835d5484a2c9;hp=8fe9d73f4b935d2fded0358abce4d2d451251717;hpb=b1320d7d840eafaee3efab338ede2e05da9df739;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Script/Test.pm b/lib/Catalyst/Script/Test.pm index 8fe9d73..268b1cd 100644 --- a/lib/Catalyst/Script/Test.pm +++ b/lib/Catalyst/Script/Test.pm @@ -1,18 +1,16 @@ package Catalyst::Script::Test; use Moose; +use Catalyst::Test (); use namespace::autoclean; with 'Catalyst::ScriptRole'; -has '+help' => (cmd_aliases => 'h'); - sub run { my $self = shift; - Class::MOP::load_class("Catalyst::Test"); Catalyst::Test->import($self->application_name); - print request($ARGV[1])->content . "\n"; + print request($ARGV[0])->content . "\n"; }