summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mumi/xapian.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/mumi/xapian.scm b/mumi/xapian.scm
index cc5997d..2723615 100644
--- a/mumi/xapian.scm
+++ b/mumi/xapian.scm
@@ -201,7 +201,12 @@ messages and index their contents in the Xapian database at DBPATH."
prefixes)
(QueryParser-add-rangeprocessor queryparser date-range-processor)
(QueryParser-add-rangeprocessor queryparser mdate-range-processor)
- (let ((query (QueryParser-parse-query queryparser querystring)))
+ (let ((query (QueryParser-parse-query queryparser querystring
+ (logior (QueryParser-FLAG-BOOLEAN)
+ (QueryParser-FLAG-PHRASE)
+ (QueryParser-FLAG-LOVEHATE)
+ (QueryParser-FLAG-BOOLEAN-ANY-CASE)
+ (QueryParser-FLAG-WILDCARD)))))
(delete-QueryParser queryparser)
query)))