Don't do dmose's paranoid checking of option values in the query page.

diff --git a/CGI.pl b/CGI.pl
index 69a67b36b217126d518076ad0779fc4c052c0418..a5a4b3b1e3034764459ec569ccb2a72823ee8f3f 100644 (file)
--- a/CGI.pl
+++ b/CGI.pl
@@ -270,6 +270,8 @@ sub navigation_header {
 }
 
 
+$::CheckOptionValues = 1;
+
 sub make_options {
     my ($src,$default,$isregexp) = (@_);
     my $last = "";
@@ -294,7 +296,7 @@ sub make_options {
         }
     }
     if (!$found && $default ne "") {
-      if ( Param("strictvaluechecks") && 
+      if ( Param("strictvaluechecks") && $::CheckOptionValues &&
            ($default ne $::dontchange) && ($default ne "-All-") &&
            ($default ne "DUPLICATE") ) {
         print "Possible bug database corruption has been detected.  " .

diff --git a/query.cgi b/query.cgi
index c7d49ace89378f8d4f6cb1bfc02557cc62fd99d1..5cb40f147f6b432980de06acea50e218af0e5d75 100755 (executable)
--- a/query.cgi
+++ b/query.cgi
@@ -26,6 +26,11 @@ use strict;
 
 require "CGI.pl";
 
+$::CheckOptionValues = 0;       # It's OK if we have some bogus things in the
+                                # pop-up lists here, from a remembered query
+                                # that is no longer quite valid.  We don't
+                                # want to crap out in the query page.
+
 # Shut up misguided -w warnings about "used only once":
 
 use vars @::legal_resolution,