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 @@ ...@@ -89,8 +89,9 @@
(defun format-readme (readme) (defun format-readme (readme)
(let ((readme-txt (file-to-string readme))) (let ((readme-txt (file-to-string readme)))
(if (string= (pathname-type readme) "md") (if (find (pathname-type readme)
;; Format markdown files to proper HTML '("md" "markdown" "mdown" "mkdn" "mdwn" "mkd")
:test #'string=)
(handler-case (handler-case
(cmark-markdown-to-html readme-txt (length readme-txt) 0) (cmark-markdown-to-html readme-txt (length readme-txt) 0)
(error () (error ()
Supports Markdown
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