diff options
Diffstat (limited to 'tissue/commit.scm')
-rw-r--r-- | tissue/commit.scm | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/tissue/commit.scm b/tissue/commit.scm index 30d07b7..10dc436 100644 --- a/tissue/commit.scm +++ b/tissue/commit.scm @@ -42,16 +42,15 @@ "Return the ID term for DOCUMENT." (string-append "Qcommit." (commit-hash commit))) +(define-method (document-boolean-terms (commit <commit>)) + "Return the boolean terms in COMMIT." + (list (string-append "Qcommit." (commit-hash commit)) + (string-append "A" (doc:commit-author commit)))) + (define-method (document-recency-date (commit <commit>)) "Return a date representing the recency of DOCUMENT" (doc:commit-author-date commit)) -(define-method (document-term-generator (commit <commit>)) - "Return a term generator indexing COMMIT." - (let ((term-generator (next-method))) - (index-person! term-generator (doc:commit-author commit) "A") - term-generator)) - (define-method (document-snippet-source-text (commit <commit>)) "Return the source text for COMMIT from which to extract a search result snippet." |