diff options
| author | Arun Isaac | 2021-09-02 23:50:32 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-09-02 23:50:32 +0530 |
| commit | 78410667ab63f1e345e4a7841d0aa711fb8b6207 (patch) | |
| tree | 3c11806b46334a04e83608f9637dfb8bfcdc7d04 /examples/search.scm | |
| parent | 4d7eac991d41cea1645d4258c4e600b5662f070d (diff) | |
| download | guile-xapian-78410667ab63f1e345e4a7841d0aa711fb8b6207.tar.gz guile-xapian-78410667ab63f1e345e4a7841d0aa711fb8b6207.tar.lz guile-xapian-78410667ab63f1e345e4a7841d0aa711fb8b6207.zip | |
xapian: Fix spacing in association list.
* examples/search.scm (search): Add a space after '.' in the prefixes
association list.
Diffstat (limited to 'examples/search.scm')
| -rw-r--r-- | examples/search.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/examples/search.scm b/examples/search.scm index e8f8aa5..eef075f 100644 --- a/examples/search.scm +++ b/examples/search.scm @@ -1,5 +1,5 @@ ;;; guile-xapian --- Guile bindings for Xapian -;;; Copyright © 2020 Arun Isaac <arunisaac@systemreboot.net> +;;; Copyright © 2020, 2021 Arun Isaac <arunisaac@systemreboot.net> ;;; ;;; This file is part of guile-xapian. ;;; @@ -34,7 +34,7 @@ ;; prefixes for field search. (query (parse-query querystring #:stemmer (make-stem "en") - #:prefixes '(("title" ."S") + #:prefixes '(("title" . "S") ("description" . "XD"))))) ;; Fold over the results, printing them. (mset-fold (lambda (item _) |