iAdd the date in the RSS feed - cl-yag - Common Lisp Yet Another website Generator	Err	bitreich.org	70
hgit clone git://bitreich.org/cl-yag/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/cl-yag/	URL:git://bitreich.org/cl-yag/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/cl-yag/	bitreich.org	70
1Log	/scm/cl-yag/log.gph	bitreich.org	70
1Files	/scm/cl-yag/files.gph	bitreich.org	70
1Refs	/scm/cl-yag/refs.gph	bitreich.org	70
1Tags	/scm/cl-yag/tag	bitreich.org	70
1README	/scm/cl-yag/file/README.md.gph	bitreich.org	70
1LICENSE	/scm/cl-yag/file/LICENSE.gph	bitreich.org	70
i---	Err	bitreich.org	70
1commit fc0d8912469f5ce1e210ded72b2f52f49d307352	/scm/cl-yag/commit/fc0d8912469f5ce1e210ded72b2f52f49d307352.gph	bitreich.org	70
1parent 013ada82f339f61de56f426824c1c3c1a88bf9b1	/scm/cl-yag/commit/013ada82f339f61de56f426824c1c3c1a88bf9b1.gph	bitreich.org	70
hAuthor: Solene Rapenne <solene@perso.pw>	URL:mailto:solene@perso.pw	bitreich.org	70
iDate:   Wed, 13 Dec 2017 20:56:37 +0100	Err	bitreich.org	70
i	Err	bitreich.org	70
iAdd the date in the RSS feed	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  M generator.lisp                      |       4 ++++	Err	bitreich.org	70
i  M templates/rss-item.tpl              |       1 +	Err	bitreich.org	70
i	Err	bitreich.org	70
i2 files changed, 5 insertions(+), 0 deletions(-)	Err	bitreich.org	70
i---	Err	bitreich.org	70
1diff --git a/generator.lisp b/generator.lisp	/scm/cl-yag/file/generator.lisp.gph	bitreich.org	70
i@@ -212,6 +212,10 @@	Err	bitreich.org	70
i               (prepare "templates/rss-item.tpl"	Err	bitreich.org	70
i                        (template "%%Title%%" (article-title article))	Err	bitreich.org	70
i                        (template "%%Description%%" (load-file (format nil "temp/data/~d.html" (article-id article))))	Err	bitreich.org	70
i+                       (let ((date (date-parse (article-date article))))	Err	bitreich.org	70
i+                         (template "%%Date%%" (format nil (date-format "~a, %DayNumber ~a %Year 00:00:00 GMT" date)	Err	bitreich.org	70
i+                                                      (subseq (getf date :dayname) 0 3)	Err	bitreich.org	70
i+                                                      (subseq (getf date :monthname) 0 3))))	Err	bitreich.org	70
i                        (template "%%Url%%"	Err	bitreich.org	70
i                                  (format nil "~darticle-~d.html"	Err	bitreich.org	70
i                                          (getf *config* :url)	Err	bitreich.org	70
1diff --git a/templates/rss-item.tpl b/templates/rss-item.tpl	/scm/cl-yag/file/templates/rss-item.tpl.gph	bitreich.org	70
i@@ -7,4 +7,5 @@	Err	bitreich.org	70
i   </description>	Err	bitreich.org	70
i   <guid>%%Url%%</guid>	Err	bitreich.org	70
i   <link>%%Url%%</link>	Err	bitreich.org	70
i+  <pubDate>%%Date%%</pubDate>	Err	bitreich.org	70
i </item>	Err	bitreich.org	70
.