X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FScript%2FFastCGI.pm;h=ba6ab9bfda85e5cf9fc28b2f7663ba04a59e1085;hb=aba0841d12cbaa53592f6792ca4ff175070fd86a;hp=1b2a2e906c9963476a8eda6913e479fc6365b019;hpb=f06d7696927be5f9d5d35da22c001b083b543d68;p=catagits%2FCatalyst-Runtime.git

diff --git a/lib/Catalyst/Script/FastCGI.pm b/lib/Catalyst/Script/FastCGI.pm
index 1b2a2e9..ba6ab9b 100644
--- a/lib/Catalyst/Script/FastCGI.pm
+++ b/lib/Catalyst/Script/FastCGI.pm
@@ -90,8 +90,9 @@ sub _plack_loader_args {
     my ($self) = shift;
 
     my $opts = Data::OptList::mkopt([
-      qw/pidfile manager nproc proc_title/,
-            detach          => [ 'daemon' ],
+      qw/manager nproc proc_title/,
+            pid             => [ 'pidfile' ],
+            daemonize       => [ 'daemon' ],
             keep_stderr     => [ 'keeperr' ],
             listen          => [ '_listen' ],
         ]);
@@ -104,11 +105,12 @@ sub _plack_loader_args {
     return %args;
 }
 
-sub _application_args {
-    my ($self) = shift;
+around _application_args => sub {
+    my ($orig, $self) = @_;
     return (
         $self->listen,
         {
+            %{ $self->$orig },
             nproc       => $self->nproc,
             pidfile     => $self->pidfile,
             manager     => $self->manager,
@@ -117,9 +119,10 @@ sub _application_args {
             proc_title  => $self->proc_title,
         }
     );
-}
+};
 
 __PACKAGE__->meta->make_immutable;
+1;
 
 =head1 NAME
 
@@ -152,6 +155,10 @@ Catalyst::Script::FastCGI - The FastCGI Catalyst Script
 
 Run a Catalyst application as fastcgi.
 
+=head1 SEE ALSO
+
+L<Catalyst::ScriptRunner>
+
 =head1 AUTHORS
 
 Catalyst Contributors, see Catalyst.pm