From b0aff47d71d587a512673fe78c910024fc675f9d Mon Sep 17 00:00:00 2001
From: "justdave%syndicomm.com" <>
Date: Sat, 2 Jun 2001 11:02:13 +0000
Subject: Fix for bug 65190: add comparison type "all words as substrings" and
 "any words as substrings" to the text fields in query.cgi Patch by Andreas
 Franke <afranke@ags.uni-sb.de> r= justdave@syndicomm.com

---
 query.cgi | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'query.cgi')

diff --git a/query.cgi b/query.cgi
index f9822bd5f..067f76036 100755
--- a/query.cgi
+++ b/query.cgi
@@ -703,10 +703,12 @@ sub StringSearch {
 <td><SELECT NAME=$type>
 };
     if ($default{$type} eq "") {
-        $default{$type} = "substring";
+        $default{$type} = "allwordssubstr";
     }
     foreach my $i (["substring", "case-insensitive substring"],
                    ["casesubstring", "case-sensitive substring"],
+                   ["allwordssubstr", "all words as substrings"],
+                   ["anywordssubstr", "any words as substrings"],
                    ["allwords", "all words"],
                    ["anywords", "any words"],
                    ["regexp", "regular expression"],
@@ -780,6 +782,8 @@ my @types = (
 	     ["casesubstring", "contains (case-sensitive) substring"],
 	     ["substring", "contains (case-insensitive) substring"],
 	     ["notsubstring", "does not contain (case-insensitive) substring"],
+	     ["allwordssubstr", "all words as (case-insensitive) substrings"],
+	     ["anywordssubstr", "any words as (case-insensitive) substrings"],
 	     ["regexp", "contains regexp"],
 	     ["notregexp", "does not contain regexp"],
 	     ["lessthan", "less than"],
-- 
cgit v1.2.3-24-g4f1b