From 693d4c492c760794df7186058f95e12f91cfc2be Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sat, 9 Jul 2022 15:45:59 +0530
Subject: bin: Move indexing document type into document-term-generator.

* bin/tissue (index): Move indexing document type into
document-term-generator generic function.
* tissue/document.scm (document-term-generator): Index document type.
---
 bin/tissue | 8 +++-----
 1 file changed, 3 insertions(+), 5 deletions(-)

(limited to 'bin')

diff --git a/bin/tissue b/bin/tissue
index f457806..fcb704f 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -307,11 +307,9 @@ To get usage information for one of these sub-commands, run
     (call-with-writable-database db-path
       (lambda (db)
         (for-each (lambda (document)
-                    (let ((term-generator (document-term-generator document)))
-                      (index-text! term-generator (document-type document) #:prefix "XT")
-                      (replace-document! db
-                                         (document-id-term document)
-                                         (TermGenerator-get-document term-generator))))
+                    (replace-document! db
+                                       (document-id-term document)
+                                       (TermGenerator-get-document (document-term-generator document))))
                   (tissue-configuration-indexed-documents (load-config)))
         (WritableDatabase-set-metadata
          db "commit" (oid->string (reference-name->oid
-- 
cgit v1.2.3