Pass the extra restart options
Tomas Doran [Wed, 23 Feb 2011 00:47:16 +0000 (00:47 +0000)]
lib/Catalyst/Script/Server.pm
t/aggregate/unit_core_script_server.t

index 331bdc8..e692859 100644 (file)
@@ -146,7 +146,7 @@ sub _restarter_args {
         ($self->_has_restart_regex     ? (filter          => $self->restart_regex)     : ()),
     ),
     (
-        map { $_ => $self->$_ } qw(application_name host port debug pidfile)
+        map { $_ => $self->$_ } qw(application_name host port debug pidfile fork background keepalive)
     );
 }
 
index fce5045..222098a 100644 (file)
@@ -151,8 +151,5 @@ sub restartopthash {
         host => undef,
         %$opthash,
     };
-    delete $val->{fork};
-    delete $val->{background};
-    delete $val->{keepalive};
     return $val;
 }