diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2020-05-10 17:21:28 +0200 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2020-05-10 17:21:28 +0200 |
| commit | db581945faaea2788abe30bffd921768e60738a9 (patch) | |
| tree | 14cd7126bbda96b7f4ecca2aceffdd79c926772c | |
| parent | 73015aa9342df4b7b900e3b9768d8fcc47ad91a3 (diff) | |
messages: Use tokenize from (mumi xapian).
| -rw-r--r-- | mumi/messages.scm | 2 | ||||
| -rw-r--r-- | mumi/xapian.scm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/mumi/messages.scm b/mumi/messages.scm index 1a9dbcf..37fedeb 100644 --- a/mumi/messages.scm +++ b/mumi/messages.scm @@ -288,4 +288,4 @@ sets that need to overlap the result set." `(#:terms ,(cons (clean-term term) terms) #:sets ,fs)))))) '(#:terms () #:sets ()) - (string-tokenize query))) + (tokenize query))) diff --git a/mumi/xapian.scm b/mumi/xapian.scm index 2723615..53737de 100644 --- a/mumi/xapian.scm +++ b/mumi/xapian.scm @@ -30,7 +30,7 @@ #:use-module (xapian wrap) #:use-module (xapian xapian) #:use-module (rnrs bytevectors) - #:export (index! index-files search)) + #:export (index! index-files tokenize search)) (define (parse-emails files) (n-par-map 4 |