about summary refs log tree commit diff
path: root/xapian
diff options
context:
space:
mode:
Diffstat (limited to 'xapian')
-rw-r--r--xapian/xapian.scm10
1 files changed, 7 insertions, 3 deletions
diff --git a/xapian/xapian.scm b/xapian/xapian.scm
index af1cf5b..3ba9458 100644
--- a/xapian/xapian.scm
+++ b/xapian/xapian.scm
@@ -196,7 +196,8 @@ generated."
                       (love-hate? #t)
                       any-case-boolean?
                       wildcard?
-                      pure-not?)
+                      pure-not?
+                      partial?)
   "Parse @var{querystring} and return a @code{Query} object.
 
 @var{prefixes} and @var{boolean-prefixes} must be association lists
@@ -218,7 +219,9 @@ supported even if they are not in capitals.
 When @var{wildcard?} is @code{#t}, wildcards are supported.
 
 When @var{pure-not?} is @code{#t}, pure @code{NOT} queries such as
-@samp{NOT apples} are allowed."
+@samp{NOT apples} are allowed.
+
+When @var{partial?} is @code{#t}, enable partial matching."
   (let ((queryparser (new-QueryParser)))
     (QueryParser-set-stemmer queryparser stemmer)
     (when stemming-strategy
@@ -240,7 +243,8 @@ When @var{pure-not?} is @code{#t}, pure @code{NOT} queries such as
                                                        (get-flag QueryParser-FLAG-LOVEHATE love-hate?)
                                                        (get-flag QueryParser-FLAG-BOOLEAN-ANY-CASE any-case-boolean?)
                                                        (get-flag QueryParser-FLAG-WILDCARD wildcard?)
-                                                       (get-flag QueryParser-FLAG-PURE-NOT pure-not?)))))
+                                                       (get-flag QueryParser-FLAG-PURE-NOT pure-not?)
+                                                       (get-flag QueryParser-FLAG-PARTIAL partial?)))))
       (delete-QueryParser queryparser)
       query)))