diff options
| -rw-r--r-- | haunt/jakob/builder/blog.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/haunt/jakob/builder/blog.scm b/haunt/jakob/builder/blog.scm index f6c64c1..8f02a80 100644 --- a/haunt/jakob/builder/blog.scm +++ b/haunt/jakob/builder/blog.scm @@ -156,7 +156,8 @@ only the posts tagged with that tag." (items->pages render-preview posts (format #f "Posts tagged with \"~a\"" tag) (tag-uri %tag-prefix tag "")))) - (group-by-tag posts (cut post-ref <> 'tags)))) + (group-by-tag (sort posts (lambda (a b) + (time<? (date->time-monotonic (post-date a)) (date->time-monotonic (post-date b))))) (cut post-ref <> 'tags)))) (define (all-tags posts) "Return a page summarizing tag usage across POSTS." |