diff options
author | Arun Isaac | 2022-07-09 15:38:07 +0530 |
---|---|---|
committer | Arun Isaac | 2022-07-09 16:41:02 +0530 |
commit | fcbd627e9a4fe936485bcb080669d72b5b60324d (patch) | |
tree | 097aa4aba7bf16a8bf8fb930733c9cc0e6b49b1e /tissue/issue.scm | |
parent | b0cf99385a73b7461789aae2d71f7ad23ab5c56f (diff) | |
download | tissue-fcbd627e9a4fe936485bcb080669d72b5b60324d.tar.gz tissue-fcbd627e9a4fe936485bcb080669d72b5b60324d.tar.lz tissue-fcbd627e9a4fe936485bcb080669d72b5b60324d.zip |
git: Use commit author date, not committer date.
* tissue/git.scm (commit-author-date): New public function.
(commit-date): Delete function.
* tissue/issue.scm (read-gemtext-issue): Use commit-author-date
instead of commit-date.
Diffstat (limited to 'tissue/issue.scm')
-rw-r--r-- | tissue/issue.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tissue/issue.scm b/tissue/issue.scm index a77e57a..ac397b4 100644 --- a/tissue/issue.scm +++ b/tissue/issue.scm @@ -382,9 +382,9 @@ gemtext file." #:title (let ((title (hashtable-ref file-details 'title ""))) (if (string-any char-set:letter title) title file)) #:creator (first commit-authors) - #:created-date (commit-date (first commits)) + #:created-date (commit-author-date (first commits)) #:last-updater (last commit-authors) - #:last-updated-date (commit-date (last commits)) + #:last-updated-date (commit-author-date (last commits)) #:assigned (hashtable-ref file-details 'assigned '()) ;; "closed" is a special keyword to indicate the open/closed ;; status of an issue. @@ -395,6 +395,6 @@ gemtext file." #:posts (map (lambda (commit author) (make <post> #:author author - #:date (commit-date commit))) + #:date (commit-author-date commit))) commits commit-authors)))) |