Introduction
Introduction Statistics Contact Development Disclaimer Help
fix rss description, using whole text now - cl-yag - Common Lisp Yet Another we…
git clone git://bitreich.org/cl-yag/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws…
Log
Files
Refs
Tags
README
LICENSE
---
commit e37816fdaba64ea82b138e9d4678d556f8c7f20d
parent 7682a4620e7aa93fabcd996fe7450e8f67bf7f37
Author: solene rapenne <[email protected]>
Date: Thu, 19 May 2016 16:47:49 +0200
fix rss description, using whole text now
Diffstat:
M generator.lisp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
---
diff --git a/generator.lisp b/generator.lisp
@@ -134,7 +134,7 @@
(loop for article in *articles* collect
(prepare "template/rss-item.tpl"
(template "%%Title%%" (getf article :title))
- (template "%%Description%%" (getf article :short ""))
+ (template "%%Description%%" (load-file (format nil "data/~d.…
(template "%%Url%%"
(format nil "~darticle-~d.html"
(getf *config* :url)
You are viewing proxied material from bitreich.org. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.