X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FWeb%2FDispatch.pm;fp=lib%2FWeb%2FDispatch.pm;h=c6dcdeddfbea8b2eb388171f374eb40f76e355cb;hb=d96756e81118d31b2e23987ae909aafd7e87269e;hp=46961c265e139f5d280cbb2ed2bcaaec948e180d;hpb=9c7c20f67d863a7c7a0f80cfa8aa4d0e48486e2a;p=catagits%2FWeb-Simple.git

diff --git a/lib/Web/Dispatch.pm b/lib/Web/Dispatch.pm
index 46961c2..c6dcded 100644
--- a/lib/Web/Dispatch.pm
+++ b/lib/Web/Dispatch.pm
@@ -37,7 +37,7 @@ sub _dispatch {
 
     return $try if ref($try) eq 'ARRAY';
     if (ref($try) eq 'HASH') {
-      $env = { %$env, %$try };
+      $env = { 'Web::Dispatch.original_env' => $env, %$env, %$try };
       next;
     }