diff options
| author | Jakob L. Kreuze <zerodaysfordays@sdf.org> | 2026-02-14 09:05:52 -0500 |
|---|---|---|
| committer | Jakob L. Kreuze <zerodaysfordays@sdf.org> | 2026-02-14 09:05:52 -0500 |
| commit | bce285712bcd2fd0ffa9796dbbb6c1c9601ed7a9 (patch) | |
| tree | e8d8c09ae5c3c61c8edcdacbae12d79327eb2c5a | |
| parent | 88e2b925af4a9da45f049d65cf7186a1b896996f (diff) | |
Fix post ordering for tag pages
| -rw-r--r-- | jakob/builder/blog.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/jakob/builder/blog.scm b/jakob/builder/blog.scm index b3f83a6..f38266b 100644 --- a/jakob/builder/blog.scm +++ b/jakob/builder/blog.scm @@ -167,9 +167,9 @@ ;; Subdirectory for post listings conditioned on post tags. (define %tag-prefix (string-append %blog-prefix "/tag")) -(define* (sort-posts posts #:keywords (reverse? #f)) +(define* (sort-posts posts #:key (reverse? #f)) (sort posts (lambda (a b) - ((if reverse? time>=? time<?) + ((if reverse? time<? time>=?) (date->time-monotonic (post-date a)) (date->time-monotonic (post-date b)))))) |