aboutsummaryrefslogtreecommitdiff
path: root/haunt/jakob/utils
diff options
context:
space:
mode:
authorJakob L. Kreuze2024-06-16 14:02:59 -0400
committerJakob L. Kreuze2024-06-16 14:02:59 -0400
commit27ffd0a40e9ee8fddfd45a7b1372ce857fe440c1 (patch)
treebebcb31996816b7ef1f6f0d961bd88efeacc25e8 /haunt/jakob/utils
parent70f28eb53f648a617d64c36b3d06c4020b5cdeef (diff)
Use the new `artifact' API instead of `make-page'
Diffstat (limited to 'haunt/jakob/utils')
-rw-r--r--haunt/jakob/utils/pagination.scm16
1 files changed, 8 insertions, 8 deletions
diff --git a/haunt/jakob/utils/pagination.scm b/haunt/jakob/utils/pagination.scm
index f869897..f75f02f 100644
--- a/haunt/jakob/utils/pagination.scm
+++ b/haunt/jakob/utils/pagination.scm
@@ -21,8 +21,8 @@
;;; Code:
(define-module (jakob utils pagination)
+ #:use-module (haunt artifact)
#:use-module (haunt html)
- #:use-module (haunt page)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:use-module (jakob theme)
@@ -104,11 +104,11 @@ the item from ITEMS passed as a parameter."
(index->file-name (1+ index))
#f))
(enable-search (and enable-search (= index 1))))
- (make-page (index->file-name index)
- (theme #:title title
- #:content
- (render-listing (map render-item subset) title
- previous-page next-page
- #:enable-search enable-search))
- sxml->html))))
+ (serialized-artifact (index->file-name index)
+ (theme #:title title
+ #:content
+ (render-listing (map render-item subset) title
+ previous-page next-page
+ #:enable-search enable-search))
+ sxml->html))))
(paginate items)))

© 2015 - 2026 Jakob L. Kreuze