ioutput of tag list in gopher export is now nicer - 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 10812b6e84c471e0b76cdb6ea4f5df420365eb36	/scm/cl-yag/commit/10812b6e84c471e0b76cdb6ea4f5df420365eb36.gph	bitreich.org	70
1parent b70cc28e578b4ce432d7e81dab33b60eb118ccaf	/scm/cl-yag/commit/b70cc28e578b4ce432d7e81dab33b60eb118ccaf.gph	bitreich.org	70
hAuthor: solene rapenne <solene@dataswamp.org>	URL:mailto:solene@dataswamp.org	bitreich.org	70
iDate:   Thu, 11 Aug 2016 15:57:26 +0200	Err	bitreich.org	70
i	Err	bitreich.org	70
ioutput of tag list in gopher export is now nicer	Err	bitreich.org	70
i	Err	bitreich.org	70
iDiffstat:	Err	bitreich.org	70
i  M generator.lisp                      |       4 ++--	Err	bitreich.org	70
i	Err	bitreich.org	70
i1 file changed, 2 insertions(+), 2 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@@ -179,10 +179,10 @@	Err	bitreich.org	70
i                (dolist (article *articles*)	Err	bitreich.org	70
i                  (setf output	Err	bitreich.org	70
i                        (concatenate 'string output	Err	bitreich.org	70
i-                                    (format nil "~a by ~a tagged (~a) ~%0~a        /article-~d.txt        ~a        ~a~%~%"	Err	bitreich.org	70
i+                                    (format nil "~a by ~a (~a) ~%0~a        /article-~d.txt        ~a        ~a~%~%"	Err	bitreich.org	70
i                                             (getf article :date)	Err	bitreich.org	70
i                                             (getf article :author (getf *config* :webmaster))	Err	bitreich.org	70
i-                                            (getf article :tag)	Err	bitreich.org	70
i+                                            (format nil "~{#~a ~}" (split-str (getf article :tag)))	Err	bitreich.org	70
i                                             (getf article :title)	Err	bitreich.org	70
i                                             (getf article :id)	Err	bitreich.org	70
i                                             (getf *config* :gopher-server)	Err	bitreich.org	70
.