marcuskammer/www.metalisp.dev
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Move md functions to sbt

Browse source
This commit is contained in:
Marcus Kammer 2025-01-24 08:51:32 +01:00
parent 0b9abc2d4a
commit ffbc5a0cdf
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 0 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
index.lisp
View file

@ -42,14 +42,6 @@
("Personal emacs dot files." "In Active Development" "Emacs Lisp") ("Personal emacs dot files." "In Active Development" "Emacs Lisp")
"https://code.metalisp.dev/marcuskammer/emacs.d"))) "https://code.metalisp.dev/marcuskammer/emacs.d")))
(defun md-to-html-string (markdown-string)
(with-output-to-string (s)
(3bmd:parse-string-and-print-to-stream markdown-string s)))
(defun md-file-to-html-string (input-file)
(with-output-to-string (s)
(3bmd:parse-and-print-to-stream input-file s)))
(unless (uiop:directory-exists-p #P"public/") (unless (uiop:directory-exists-p #P"public/")
(uiop:ensure-all-directories-exist '(#P"public/"))) (uiop:ensure-all-directories-exist '(#P"public/")))