diff options
| author | Jelle Licht <jlicht@fsfe.org> | 2023-03-07 20:01:37 +0100 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2023-03-21 13:11:40 -0400 |
| commit | 62707908ed5e2525930b483e1a9c29a8ec7652ba (patch) | |
| tree | 35b3174e8ce96827e972ff59a73f0a3a4274468f | |
| parent | d7cac9e175082829ebfd31185bc3811575f2deb5 (diff) | |
post: Add fallback value to post-time.
* haunt/post.scm (post-time): Implement in terms of post-date, which
has a fallback value.
| -rw-r--r-- | haunt/post.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/haunt/post.scm b/haunt/post.scm index 0a0bb8d..ebe2689 100644 --- a/haunt/post.scm +++ b/haunt/post.scm @@ -86,7 +86,7 @@ specified." (or (post-ref post 'date) %default-date)) (define (post-time post) - (date->time-utc (post-ref post 'date))) + (date->time-utc (post-date post))) (define (posts/reverse-chronological posts) "Returns POSTS sorted in reverse chronological order." |