11 lines
248 B
Clojure
11 lines
248 B
Clojure
|
(ns ldview.util
|
||
|
(:require [noir.io :as io]
|
||
|
[markdown.core :as md]))
|
||
|
|
||
|
(defn md->html
|
||
|
"reads a markdown file from public/md and returns an HTML string"
|
||
|
[filename]
|
||
|
(->>
|
||
|
(io/slurp-resource filename)
|
||
|
(md/md-to-html-string)))
|