fix rss description, using whole text now - cl-yag - Common Lisp Yet Another website Generator
 (HTM) git clone git://bitreich.org/cl-yag/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/cl-yag/
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) Tags
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit e37816fdaba64ea82b138e9d4678d556f8c7f20d
 (DIR) parent 7682a4620e7aa93fabcd996fe7450e8f67bf7f37
 (HTM) Author: solene rapenne <solene@dataswamp.org>
       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(-)
       ---
 (DIR) 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.txt" (getf article :id))))
                          (template "%%Url%%"
                                    (format nil "~darticle-~d.html"
                                            (getf *config* :url)