Trivial test feature, fixes RT#53653

diff --git a/Changes b/Changes
index 44cb13b..dec8e3c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -15,6 +15,8 @@
      now enables the X-Catalyst header being printed when not in debug mode.
    - Require CGI::Simple::Cookie version 1.109 to ensure support for the
      HttpOnly flag
+   - Allow the myapp_test.pl script to be given a list of paths which it
+     will retrieve all of. (RT#53653)
 
   Documentation:
    - The Catalyst::Test::get method is documented as returning the raw

diff --git a/lib/Catalyst/Script/Test.pm b/lib/Catalyst/Script/Test.pm
index 53473a4..36934b2 100644 (file)
--- a/lib/Catalyst/Script/Test.pm
+++ b/lib/Catalyst/Script/Test.pm
@@ -10,7 +10,9 @@ sub run {
 
     Catalyst::Test->import($self->application_name);
 
-    print request($self->ARGV->[0])->content  . "\n";
+    foreach my $arg (@{ $self->ARGV }) {
+        print request($arg)->content  . "\n";
+    }
 }