From: Tomas Doran <bobtfish@bobtfish.net>
Date: Wed, 30 Mar 2011 12:49:03 +0000 (+0100)
Subject: Pass extra args from ScriptRunner->run to ->new_with_options.
X-Git-Tag: 5.89003~44^2~1
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=c52f6c86367cb6a5db10797b52fe869439f0ae3c

Pass extra args from ScriptRunner->run to ->new_with_options.

This is to allow you to reuse the loading logic in ::ScriptRunning, without
being forced to push things into %ENV to get them picked up
---

diff --git a/lib/Catalyst/ScriptRunner.pm b/lib/Catalyst/ScriptRunner.pm
index 247ce30..06b36b5 100644
--- a/lib/Catalyst/ScriptRunner.pm
+++ b/lib/Catalyst/ScriptRunner.pm
@@ -6,7 +6,7 @@ use File::Spec;
 use namespace::autoclean;
 
 sub run {
-    my ($self, $class, $scriptclass) = @_;
+    my ($self, $class, $scriptclass, %args) = @_;
     my $classtoload = "${class}::Script::$scriptclass";
 
     lib->import(File::Spec->catdir($FindBin::Bin, '..', 'lib'));
@@ -17,7 +17,7 @@ sub run {
         $classtoload = "Catalyst::Script::$scriptclass";
         Class::MOP::load_class($classtoload);
     }
-    $classtoload->new_with_options( application_name => $class )->run;
+    $classtoload->new_with_options( application_name => $class, %args )->run;
 }
 
 __PACKAGE__->meta->make_immutable;