miniblog

commit 38bf2aa74c2561f498347151d6b4c3e55c71514c
parent b9eb2a0bf6c47cb02967a3286c122b4a7506d11d
Author: Decay <decay@todayiwilllaunchmyinfantsonintoorbit.com>
Date:   Mon,  2 Nov 2020 13:09:39 -0800

Moving to 3BMD for Markdown processing

cl-markdown is ancient, unmaintained and breaks image links

Diffstat:
M
miniblog.asd
 | 
2
+-
M
src/format.lisp
 | 
5
+++--

2 files changed, 4 insertions(+), 3 deletions(-)
diff --git a/miniblog.asd b/miniblog.asd
@@ -13,11 +13,11 @@ into date-structured directories as a normal HTML."
            :depends-on ("uiop"
                         "alexandria"
                         "cl-fad"
-                        "cl-markdown"
                         "djula"
                         "dbd-sqlite3"
                         "sxql"
                         "mito"
+                        "3bmd"
                         "local-time"
                         "str"
                         "command-line-arguments")
diff --git a/src/format.lisp b/src/format.lisp
@@ -11,8 +11,9 @@
    Monday, February 3rd 2020 at 2:46 PM PST")
 
 (defun markdown (content)
-  "Translate CONTENT with cl-markdown"
-  (nth 1 (multiple-value-list (cl-markdown:markdown content :stream nil))))
+  "Translate CONTENT with 3bmd"
+  (with-output-to-string (os)
+    (3bmd:parse-string-and-print-to-stream content os)))
 
 (defun rfc-822-format (datetime &optional (tz *default-timezone*))
   "RFC 822/1123 date formatter for RSS items"