diff options
-rw-r--r-- | tissue/document.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tissue/document.scm b/tissue/document.scm index b12ccbb..983a1f2 100644 --- a/tissue/document.scm +++ b/tissue/document.scm @@ -164,7 +164,7 @@ and further text, increase-termpos! must be called before indexing." (define-method (document-id-term (document <file-document>)) "Return the ID term for DOCUMENT." - (string-append "Q" (file-document-path document))) + (string-append "Qfile." (file-document-path document))) (define-method (document-text (document <file-document>)) "Return the full text of DOCUMENT." |