Commit 90859610 authored by Antoine Martin's avatar Antoine Martin Committed by Antoine Martin
Browse files

Handle multiple markdown extensions

parent bdddc9ae
......@@ -89,8 +89,9 @@
(defun format-readme (readme)
(let ((readme-txt (file-to-string readme)))
(if (string= (pathname-type readme) "md")
;; Format markdown files to proper HTML
(if (find (pathname-type readme)
'("md" "markdown" "mdown" "mkdn" "mdwn" "mkd")
:test #'string=)
(handler-case
(cmark-markdown-to-html readme-txt (length readme-txt) 0)
(error ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment