Meh, that shows what I mean. This can be done waaaay more elegantly by abstracting...

[catagits/Catalyst-Runtime.git] / t / lib / TestAppToTestScripts.pm

diff --git a/t/lib/TestAppToTestScripts.pm b/t/lib/TestAppToTestScripts.pm
index 8102203..f32154a 100644 (file)
--- a/t/lib/TestAppToTestScripts.pm
+++ b/t/lib/TestAppToTestScripts.pm
@@ -1,12 +1,12 @@
 package TestAppToTestScripts;
 use strict;
 use warnings;
+use Carp;
 
-our %RUN_ARGS;
+our @RUN_ARGS;
 
 sub run {
-    my ($class, %opts) = @_;
-    %RUN_ARGS = %opts;
+    @RUN_ARGS = @_;
     1; # Does this work?
 }