Fixed perl warning which occurs if $ENV{"CONTENT_TYPE"} is not set.

git-svn-id: svn://10.0.0.236/trunk@64645 18797224-902f-48f8-a5cc-f745e15eee43
2000-03-30 23:56:36 +00:00
parent d77fde69c8
commit 2d5bcbdec0
1 changed files with 1 additions and 1 deletions
--- a/mozilla/webtools/bugzilla/CGI.pl
+++ b/mozilla/webtools/bugzilla/CGI.pl
@@ -978,7 +978,7 @@ if (defined $ENV{"REQUEST_METHOD"}) {
        }
        ProcessFormFields $::buffer;
    } else {
-        if ($ENV{"CONTENT_TYPE"} =~
+        if (exists($ENV{"CONTENT_TYPE"}) && $ENV{"CONTENT_TYPE"} =~
            m@multipart/form-data; boundary=\s*([^; ]+)@) {
            ProcessMultipartFormFields($1);
            $::buffer = "";