fixed Server
Devin Austin [Tue, 30 Jun 2009 18:28:47 +0000 (18:28 +0000)]
lib/Catalyst/Script/Server.pm

index 7ddad3e..2854f83 100644 (file)
@@ -1,5 +1,10 @@
 package Catalyst::Script::Server;
 
+BEGIN {
+    $ENV{CATALYST_ENGINE} ||= 'HTTP';
+    $ENV{CATALYST_SCRIPT_GEN} = 31;
+    require Catalyst::Engine::HTTP;
+}
 
 use FindBin qw/$Bin/;
 use lib "$Bin/../lib";