We need to capture @ARGV in the restarter, for the benefit of Win32
[catagits/Catalyst-Devel.git] / lib / Catalyst / Restarter / Win32.pm
index ef39ee4..65a8e3e 100644 (file)
@@ -16,7 +16,7 @@ sub _fork_and_start {
 
     # This is totally hack-tastic, and is probably much slower, but it
     # does seem to work.
-    my @command = ( $^X, $0, grep { ! /^\-r/ } @ARGV );
+    my @command = ( $^X, $0, grep { ! /^\-r/ } @{ $self->argv } );
 
     my $child = Proc::Background->new(@command);