diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2020-04-22 10:58:20 +0200 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2020-04-22 10:58:20 +0200 |
commit | aea19d8e632b66e0258ac898e54cfa12f77b6e47 (patch) | |
tree | 6224e83dcaa7ba487fc9ca52731b8a27d60044bb | |
parent | 5318c2089f96a8652f1413f06bc8e1ce09d12583 (diff) |
xapian: Rename index to index-files.
-rw-r--r-- | mumi/xapian.scm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/mumi/xapian.scm b/mumi/xapian.scm index f7573c7..3dee381 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 search)) + #:export (index-files search)) (define (parse-emails files) (n-par-map 4 @@ -53,8 +53,10 @@ (assoc-ref from 'address))))) "<unknown>")) -(define* (index files #:key - (dbpath (string-append (%config 'db-dir) "/mumi.xapian"))) +(define* (index-files files #:key + (dbpath (string-append (%config 'db-dir) "/mumi.xapian"))) + "Parse all given Debbugs log files in FILES as a list of email +messages and index their contents in the Xapian database at DBPATH." (define (index-chunk files+mails) (call-with-writable-database dbpath |