Bug 235265: Getting rid of some unwanted form value dumps.

Patch by Jouni Heikniemi <jouni@heikniemi.net>
r= justdave, kiko; a= justdave

diff --git a/editcomponents.cgi b/editcomponents.cgi
index 5ed7a28d70564c63b910b3cd4e0459251b11a724..f5703666522f05dfd5b77e0f4f54b2185a86eb62 100755 (executable)
--- a/editcomponents.cgi
+++ b/editcomponents.cgi
@@ -856,6 +856,3 @@ if ($action eq 'update') {
 PutHeader("Error");
 print "I don't have a clue what you want.<BR>\n";
 
-foreach ( sort keys %::FORM) {
-    print "$_: $::FORM{$_}<BR>\n";
-}

diff --git a/editgroups.cgi b/editgroups.cgi
index 4f97972b30093b56b192ad793a479798f86248d4..d3515b019fb05887b36e3fd48056f78619e1adc3 100755 (executable)
--- a/editgroups.cgi
+++ b/editgroups.cgi
@@ -671,10 +671,6 @@ if (($action eq 'remove_all_regexp') || ($action eq 'remove_all')) {
 PutHeader("Error");
 print "I don't have a clue what you want.<BR>\n";
 
-foreach ( sort keys %::FORM) {
-    print "$_: $::FORM{$_}<BR>\n";
-}
-
 PutTrailer("<a href=editgroups.cgi>Try the group list</a>");
 
 # confirm if the user wants to remove the explicit users

diff --git a/editmilestones.cgi b/editmilestones.cgi
index e707cf46d7adde365dfefd9721e32d76ff6e8297..e5c8844bd2600a2b6ffead241d90512e7fb8f720 100755 (executable)
--- a/editmilestones.cgi
+++ b/editmilestones.cgi
@@ -569,6 +569,3 @@ if ($action eq 'update') {
 PutHeader("Error");
 print "I don't have a clue what you want.<BR>\n";
 
-foreach ( sort keys %::FORM) {
-    print "$_: $::FORM{$_}<BR>\n";
-}

diff --git a/editproducts.cgi b/editproducts.cgi
index 051fdb86c5cf3bb8c29150002c005bfcc976eff1..b3ab7e1a2a37b8a85ccd969991ef7c9467fce83f 100755 (executable)
--- a/editproducts.cgi
+++ b/editproducts.cgi
@@ -1510,7 +1510,3 @@ if ($action eq 'editgroupcontrols') {
 
 PutHeader("Error");
 print "I don't have a clue what you want.<BR>\n";
-
-foreach ( sort keys %::FORM) {
-    print "$_: $::FORM{$_}<BR>\n";
-}

diff --git a/editusers.cgi b/editusers.cgi
index 3db5aef86322b847415e7b7b71ae6308d91c7580..36135a1e2cb79c75e6a430ce31865569486800a3 100755 (executable)
--- a/editusers.cgi
+++ b/editusers.cgi
@@ -884,7 +884,3 @@ if ($action eq 'update') {
 
 PutHeader("Error");
 print "I don't have a clue what you want.<BR>\n";
-
-foreach ( sort keys %::FORM) {
-    print "$_: $::FORM{$_}<BR>\n";
-}

diff --git a/editversions.cgi b/editversions.cgi
index 527f42aafe42b8eb3b69cbf5ea50d0e35cb0e793..0b5e6a23ac74f5c649a302dd9cd45800d1ef774e 100755 (executable)
--- a/editversions.cgi
+++ b/editversions.cgi
@@ -543,7 +543,3 @@ if ($action eq 'update') {
 
 PutHeader("Error");
 print "I don't have a clue what you want.<BR>\n";
-
-foreach ( sort keys %::FORM) {
-    print "$_: $::FORM{$_}<BR>\n";
-}