diff options
author | David Thompson <dthompson@vistahigherlearning.com> | 2021-03-18 17:51:37 -0400 |
---|---|---|
committer | David Thompson <dthompson@vistahigherlearning.com> | 2021-03-18 17:52:29 -0400 |
commit | d22bf423c1b82bd7ddb47ae1e3cb13f3ee270a0c (patch) | |
tree | 7ea249bab45436962187f0aec6ddd38912a98f74 /haunt/builder/blog.scm | |
parent | 5255259bf048b863e222c41dc406c91be1b2eba0 (diff) |
Create a unified type for build artifacts.
Deprecate <page> and <asset>.
Diffstat (limited to 'haunt/builder/blog.scm')
-rw-r--r-- | haunt/builder/blog.scm | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/haunt/builder/blog.scm b/haunt/builder/blog.scm index 2830881..4cf671f 100644 --- a/haunt/builder/blog.scm +++ b/haunt/builder/blog.scm @@ -27,6 +27,7 @@ #:use-module (ice-9 match) #:use-module (srfi srfi-9) #:use-module (srfi srfi-19) + #:use-module (haunt artifact) #:use-module (haunt site) #:use-module (haunt post) #:use-module (haunt page) @@ -127,16 +128,16 @@ decorated by THEME, whose URLs start with PREFIX." (define (post->page post) (let ((base-name (string-append (site-post-slug site post) ".html"))) - (make-page (make-file-name base-name) - (render-post theme site post) - sxml->html))) + (serialized-artifact (make-file-name base-name) + (render-post theme site post) + sxml->html))) (define collection->page (match-lambda ((title file-name filter) - (make-page (make-file-name file-name) - (render-collection theme site title (filter posts) prefix) - sxml->html)))) + (serialized-artifact (make-file-name file-name) + (render-collection theme site title (filter posts) prefix) + sxml->html)))) (append (map post->page posts) (map collection->page collections)))) |