diff options
author | Arun Isaac | 2022-07-13 13:27:30 +0530 |
---|---|---|
committer | Arun Isaac | 2022-07-19 17:37:02 +0530 |
commit | e2fe50c591706a7902048aaef911ce433522a322 (patch) | |
tree | 4da5664ccc7a33667db51358d0fc299683cac7b2 /tissue/commit.scm | |
parent | 6fa357a7f5793b29473a5fb1a2476eee38d676d3 (diff) | |
download | tissue-e2fe50c591706a7902048aaef911ce433522a322.tar.gz tissue-e2fe50c591706a7902048aaef911ce433522a322.tar.lz tissue-e2fe50c591706a7902048aaef911ce433522a322.zip |
document: Store serialized date as value in Xapian document.
* tissue/document.scm (document-recency-date): Declare public generic
function.
(document-term-generator): Store serialized date in slot 0 of Xapian
document.
* tissue/file-document.scm (document-recency-date): New generic
method.
* tissue/commit.scm (document-recency-date): New generic method.
Diffstat (limited to 'tissue/commit.scm')
-rw-r--r-- | tissue/commit.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tissue/commit.scm b/tissue/commit.scm index 2ff6553..30d07b7 100644 --- a/tissue/commit.scm +++ b/tissue/commit.scm @@ -42,6 +42,10 @@ "Return the ID term for DOCUMENT." (string-append "Qcommit." (commit-hash 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))) |