diff options
Diffstat (limited to 'tissue/document.scm')
-rw-r--r-- | tissue/document.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tissue/document.scm b/tissue/document.scm index e40c80e..ed69254 100644 --- a/tissue/document.scm +++ b/tissue/document.scm @@ -153,6 +153,7 @@ and further text, increase-termpos! must be called before indexing." #:data (call-with-output-string (cut write (object->scm document) <>)) #:terms `((,(document-id-term document) . 0)))))) + (index-text! term-generator (document-type document) #:prefix "XT") (index-text! term-generator (document-title document) #:prefix "S") (index-text! term-generator (document-text document)) term-generator)) |