another patch from stas

markstos · Apr 22, 2003 · a0d75a9 · a0d75a9
1 parent b024aec
commit a0d75a9
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/CGI/Cookie.pm b/CGI/Cookie.pm
@@ -75,6 +75,9 @@ sub get_raw_cookie {
   if ($r) {
     $raw_cookie = $r->headers_in->{'Cookie'};
   } else {
+    if ($MOD_PERL && !exists $ENV{REQUEST_METHOD}) {
+      die "Run $r->subprocess_env; before calling fetch()";
+    }
     $raw_cookie = $ENV{HTTP_COOKIE} || $ENV{COOKIE};
   }
 }