diff --git a/doc/build.scm b/doc/build.scm index 530d6435082e8211bdc26e4b9833a2e56db96aae..1367fac6280026009e6ae941ceed6c66d0a6e303 100644 --- a/doc/build.scm +++ b/doc/build.scm @@ -247,8 +247,16 @@ directory containing LaTeX files." \\includepdf[fitpaper=true, pages=-]{back.pdf} "))))) (document (eval exp (make-user-module 'skribilo))) - (date (or (markup-option document #:date) - "February 2025")) + (date (match (markup-option document #:date) + ((year month rest ...) + (let* ((month (string->number month)) + (month (cond + ((= month 1) "January") + ((= month 2) "February") + ((= month 3) "March") + (else "Too late!")))) + (string-append month " " year))) + (_ "Fix Skribilo CommonMark reader :-)"))) (authors (string-join (map (lambda (author) (markup-option author #:name))