diff options
| author | Arun Isaac | 2026-11-06 22:52:20 +0000 |
|---|---|---|
| committer | Arun Isaac | 2026-11-06 22:52:20 +0000 |
| commit | 4fa06ec83c87657bee65431ae13abbd7b92b4a34 (patch) | |
| tree | bb896c98714965121dbee699e2436d6e9fa06b8a /xapian | |
| parent | a696f434fb0b0f642c8c5b7b02f4b07ea9340f6d (diff) | |
| download | guile-xapian-4fa06ec83c87657bee65431ae13abbd7b92b4a34.tar.gz guile-xapian-4fa06ec83c87657bee65431ae13abbd7b92b4a34.tar.lz guile-xapian-4fa06ec83c87657bee65431ae13abbd7b92b4a34.zip | |
Diffstat (limited to 'xapian')
| -rw-r--r-- | xapian/xapian.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/xapian/xapian.scm b/xapian/xapian.scm index 3c15b70..66312d2 100644 --- a/xapian/xapian.scm +++ b/xapian/xapian.scm @@ -36,6 +36,7 @@ call-with-writable-database call-with-in-memory-database add-document! + delete-document! replace-document! make-document document-data @@ -111,6 +112,7 @@ in-memory database would always remain empty and is of little use." (dynamic-wind noop (cut proc db) (cut delete-WritableDatabase db)))) (define add-document! WritableDatabase-add-document) +(define delete-document! WritableDatabase-delete-document) (define replace-document! WritableDatabase-replace-document) (define* (make-document #:key data (terms '()) (values '())) |