fixing newline return for source, precisely for <pre> tag - 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 90c0b0856598602ac56d81dc055f3d17c31da061
 (DIR) parent da8e0af550cd5a47d4fccc399636d47287b143dd
 (HTM) Author: Solene Rapenne <solene@dataswamp.org>
       Date:   Tue,  3 May 2016 22:08:30 +0200
       
       fixing newline return for source, precisely for <pre> tag
       
       Diffstat:
         M generator.lisp                      |       2 +-
       
       1 file changed, 1 insertion(+), 1 deletion(-)
       ---
 (DIR) diff --git a/generator.lisp b/generator.lisp
       @@ -30,7 +30,7 @@
        ;; we have to remove the quotes
        ;; when using collect in a loop
        (defun strip-quotes(input)
       -  (format nil "~{~d~}" input))
       +  (format nil "~{~d~%~}" input))
        
        ;; load a file as a string
        ;; we escape ~ to avoid failures with format