removed cgi-server.pl

[catagits/Catalyst-Runtime.git] / lib / Catalyst / Engine / Server.pm

diff --git a/lib/Catalyst/Engine/Server.pm b/lib/Catalyst/Engine/Server.pm
index 014e2f1..47aa7f6 100644 (file)
--- a/lib/Catalyst/Engine/Server.pm
+++ b/lib/Catalyst/Engine/Server.pm
@@ -26,13 +26,12 @@ This class overloads some methods from C<Catalyst::Engine::CGI>.
 =cut
 
 sub run {
-    my $class  = shift;
-    my $port   = shift || 3000;
-    my $script = shift;
+    my $class = shift;
+    my $port  = shift || 3000;
 
     my $server = Catalyst::Engine::Server::Simple->new($port);
 
-    $server->handler( sub { $script ? print `$script` : $class->handler } );
+    $server->handler( sub { $class->handler } );
     $server->run;
 }