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=4b308530731919b492bf4ef771f6ea6e93ae35d5;hpb=0e4038c63189b155c40e50c9d8c26f618e1f9814;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Script/Test.pm b/lib/Catalyst/Script/Test.pm index 4b30853..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'; -__PACKAGE__->meta->get_attribute('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"; }