diff options
Diffstat (limited to 'haunt/builder/rss.scm')
| -rw-r--r-- | haunt/builder/rss.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/haunt/builder/rss.scm b/haunt/builder/rss.scm index d614d9d..d78a26b 100644 --- a/haunt/builder/rss.scm +++ b/haunt/builder/rss.scm @@ -92,6 +92,7 @@ (subtitle "Recent Posts") (filter posts/reverse-chronological) (max-entries 20) + (publication-date (current-date)) (blog-prefix "")) "Return a builder procedure that renders a list of posts as an RSS feed. All arguments are optional: @@ -105,6 +106,8 @@ rendering. MAX-ENTRIES: The maximum number of posts to render in the feed. +PUBLICATION-DATE: The feed publication date. + BLOG-PREFIX: The prefix for all post URLs, which is the combination of the blog's prefix and post prefix." (lambda (site posts) @@ -116,7 +119,7 @@ the blog's prefix and post prefix." ;; It looks like RSS's description and atom's subtitle ;; are equivalent? (description ,subtitle) - (pubDate ,(date->rfc822-str (current-date))) + (pubDate ,(date->rfc822-str publication-date)) (link ,(string-append (symbol->string (site-scheme site)) |