[Catalyst-commits] r10111 - in Catalyst-Runtime/5.80/trunk: . lib/Catalyst/Engine

[t0m at dev.catalyst.perl.org]

Author: t0m
Date: 2009-05-13 16:30:50 +0000 (Wed, 13 May 2009)
New Revision: 10111

Modified:
   Catalyst-Runtime/5.80/trunk/Changes
   Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm
Log:
Fix ->engine->env for the dev server. Catalyst-Plugin-ENV to please to be dieing in a fire, kthnx?

Modified: Catalyst-Runtime/5.80/trunk/Changes
===================================================================
--- Catalyst-Runtime/5.80/trunk/Changes	2009-05-13 13:35:40 UTC (rev 10110)
+++ Catalyst-Runtime/5.80/trunk/Changes	2009-05-13 16:30:50 UTC (rev 10111)
@@ -10,6 +10,8 @@
           noted by dmaki. (t0m)
         - Fix so that / (and other special characters) are URL encoded when
           passed into $c->uri_for as Args/CaptureArgs (t0m)
+        - Fix development server so that $c->engine->env returns the correct
+          environment (t0m)
 
 5.80003 2009-04-29 16:23:53
         - Various POD tweaks. (hdp, dandv)

Modified: Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm
===================================================================
--- Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm	2009-05-13 13:35:40 UTC (rev 10110)
+++ Catalyst-Runtime/5.80/trunk/lib/Catalyst/Engine/HTTP.pm	2009-05-13 16:30:50 UTC (rev 10111)
@@ -388,7 +388,7 @@
             # this far out, but then again it's only the dev server anyway.
             local $SIG{CHLD} = 'DEFAULT';
 
-            $class->handle_request;
+            $class->handle_request( env => \%ENV );
         }
     
         DEBUG && warn "Request done\n";