~solene/cl-yag

dcbc55ff7e26410c8c8d7f06f68e1c0a246bcdd1 — Solene Rapenne 3 years ago a9cc963 v2.00
Make index page compatible with subscriptions
1 files changed, 4 insertions(+), 1 deletions(-)

M generator.lisp
M generator.lisp => generator.lisp +4 -1
@@ 180,9 180,12 @@
      (setf output
	    (string
	     (concatenate 'string output
                          (format nil "=> ~a/articles/~a.txt ~a~%"
                          (format nil "=> ~a/articles/~a.md ~a-~2,'0d-~2,'0d ~a~%"
                                  (getf *config* :gemini-path)
                                  (article-id article)
                                  (getf (article-date article) :year)
                                  (getf (article-date article) :monthnumber)
                                  (getf (article-date article) :daynumber)
                                  (article-title article))))))
    output))