[project @ 2002-12-08 13:50:29 by cjwatson]

Accept ';' as a CGI argument separator.

diff --git a/cgi/common.pl b/cgi/common.pl
index 340bbdf3ec1ba891037ea388a4ae11d39e356d5b..d45b9debc80d45801771551e6dc5bfe72867c4ae 100644 (file)
--- a/cgi/common.pl
+++ b/cgi/common.pl
@@ -70,7 +70,7 @@ sub readparse {
     } else {
         return;
     }
-    foreach (split(/&/,$in)) {
+    foreach (split(/[&;]/,$in)) {
         s/\+/ /g;
         ($key, $val) = split(/=/,$_,2);
         $key=~s/%(..)/pack("c",hex($1))/ge;