diff options
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/tissue | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/tissue b/bin/tissue index 59de104..e29cf3c 100755 --- a/bin/tissue +++ b/bin/tissue @@ -250,7 +250,9 @@ top-level of the git repository." (call-with-writable-database %xapian-index (lambda (db) (for-each (lambda (indexed-document) - (let* ((document ((indexed-document-reader indexed-document))) + (let* ((document (slot-set ((indexed-document-reader indexed-document)) + 'web-uri + (indexed-document-web-uri indexed-document))) (term-generator (document-term-generator document))) (index-text! term-generator (document-type document) #:prefix "XT") (replace-document! db |