summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--haunt.scm4
-rw-r--r--theme.scm3
2 files changed, 6 insertions, 1 deletions
diff --git a/haunt.scm b/haunt.scm
index 913c16a..2b83cdb 100644
--- a/haunt.scm
+++ b/haunt.scm
@@ -1,5 +1,6 @@
(use-modules
(haunt builder assets)
+ (haunt builder atom)
(haunt builder flat-pages)
(haunt builder blog)
(haunt artifact)
@@ -46,6 +47,9 @@
(blog #:theme hwebs-theme-now
#:collections posts-now
#:prefix "now")
+ (atom-feed #:file-name "blog/feed.xml"
+ #:filter filter-not-now
+ #:blog-prefix "/blog/post")
(flat-pages #:template flat-page-template)
(static-directory "images")
(lambda (site posts)
diff --git a/theme.scm b/theme.scm
index 7fcef24..22ea1c7 100644
--- a/theme.scm
+++ b/theme.scm
@@ -51,7 +51,8 @@
,(post-sxml post)))
#:collection-template
(lambda (site title posts prefix)
- `((ul
+ `((p (a (@ (href "/blog/feed.xml")) "Atom feed."))
+ (ul
,@(map (lambda (post)
`(li (a (@ (href ,(post-uri post site prefix)))
,(post-ref post 'title)