[Catalyst-commits] r10847 - in Catalyst-Runtime/5.80/branches/better_scripts: lib/Catalyst/Script t/TestApp/lib/TestApp/Controller

dhoss at dev.catalyst.perl.org dhoss at dev.catalyst.perl.org
Sat Jul 11 02:33:44 GMT 2009


Author: dhoss
Date: 2009-07-11 02:33:44 +0000 (Sat, 11 Jul 2009)
New Revision: 10847

Modified:
   Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm
   Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/lib/TestApp/Controller/Root.pm
Log:
cleaned up sub runner


Modified: Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm	2009-07-11 02:24:02 UTC (rev 10846)
+++ Catalyst-Runtime/5.80/branches/better_scripts/lib/Catalyst/Script/Server.pm	2009-07-11 02:33:44 UTC (rev 10847)
@@ -209,10 +209,6 @@
            background        => $self->background,
            pidfile           => $self->pidfile,
            keepalive         => $self->keepalive,
-           restart           => $self->restart,
-           restart_delay     => $self->restart_delay,
-           restart_regex     => qr/$self->restart_regex/,
-           restart_directory => $self->restart_directory,
            follow_symlinks   => $self->follow_symlinks,
         }  
     );

Modified: Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/lib/TestApp/Controller/Root.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/lib/TestApp/Controller/Root.pm	2009-07-11 02:24:02 UTC (rev 10846)
+++ Catalyst-Runtime/5.80/branches/better_scripts/t/TestApp/lib/TestApp/Controller/Root.pm	2009-07-11 02:33:44 UTC (rev 10847)
@@ -39,6 +39,12 @@
     $c->response->status(404);
 }
 
+sub test : Local {
+  my ($self, $c) = @_;
+  
+  $c->res->body("herro!!");
+}
+
 =head2 end
 
 Attempt to render a view, if needed.




More information about the Catalyst-commits mailing list