commit fc0d8912469f5ce1e210ded72b2f52f49d307352 Solene Rapenne <solene@perso.pw> 2017-12-13 20:56:37 +0100 Add the date in the RSS feed
generator.lisp | 4 ++++ templates/rss-item.tpl | 1 + 2 files changed, 5 insertions(+)
diff --git a/generator.lisp b/generator.lisp index 96215ae..d7e65e8 100644 --- a/generator.lisp +++ b/generator.lisp @@ -212,6 +212,10 @@ (prepare "templates/rss-item.tpl" (template "%%Title%%" (article-title article)) (template "%%Description%%" (load-file (format nil "temp/data/~d.html" (article-id article)))) + (let ((date (date-parse (article-date article)))) + (template "%%Date%%" (format nil (date-format "~a, %DayNumber ~a %Year 00:00:00 GMT" date) + (subseq (getf date :dayname) 0 3) + (subseq (getf date :monthname) 0 3)))) (template "%%Url%%" (format nil "~darticle-~d.html" (getf *config* :url) diff --git a/templates/rss-item.tpl b/templates/rss-item.tpl index 89ac8f0..06df85a 100644 --- a/templates/rss-item.tpl +++ b/templates/rss-item.tpl @@ -7,4 +7,5 @@ </description> <guid>%%Url%%</guid> <link>%%Url%%</link> + <pubDate>%%Date%%</pubDate> </item>