iShort article texts should be in a paragraph - 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 f074e943bcf03b62ddee3273b075dc25dbe69904 /scm/cl-yag/commit/f074e943bcf03b62ddee3273b075dc25dbe69904.gph bitreich.org 70 1parent a8dfa314e9911295a3c52318d4702e4761093e2f /scm/cl-yag/commit/a8dfa314e9911295a3c52318d4702e4761093e2f.gph bitreich.org 70 hAuthor: Solene Rapenne URL:mailto:solene@perso.pw bitreich.org 70 iDate: Fri, 18 Oct 2019 15:06:35 +0200 Err bitreich.org 70 i Err bitreich.org 70 iShort article texts should be in a paragraph Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i M generator.lisp | 2 +- Err bitreich.org 70 i Err bitreich.org 70 i1 file changed, 1 insertion(+), 1 deletion(-) 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@@ -243,7 +243,7 @@ Err bitreich.org 70 i (template "%%Text%%" (if no-text Err bitreich.org 70 i "" Err bitreich.org 70 i (if (and tiny (article-tiny article)) Err bitreich.org 70 i- (article-tiny article) Err bitreich.org 70 i+ (format nil "

~a

" (article-tiny article)) Err bitreich.org 70 i (load-file (format nil "temp/data/~d.html" (article-id article)))))))) Err bitreich.org 70 i Err bitreich.org 70 i ;; return a html string Err bitreich.org 70 .