summaryrefslogtreecommitdiff
path: root/haunt/post.scm
diff options
context:
space:
mode:
Diffstat (limited to 'haunt/post.scm')
-rw-r--r--haunt/post.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/haunt/post.scm b/haunt/post.scm
index 964ae6f..08c8872 100644
--- a/haunt/post.scm
+++ b/haunt/post.scm
@@ -59,14 +59,14 @@
char-set:whitespace))
"-"))
-(define (post->time post)
+(define (post-time post)
(date->time-utc (post-ref post 'date)))
(define (posts/reverse-chronological posts)
"Returns POSTS sorted in reverse chronological order."
(sort posts
(lambda (a b)
- (time>? (post->time a) (post->time b)))))
+ (time>? (post-time a) (post-time b)))))
(define (posts/group-by-tag posts)
"Return an alist of tags mapped to the posts that used them."