add plain render function

This commit is contained in:
Gered 2014-03-29 17:10:33 -04:00
parent 5bc8f1810c
commit b9ebaf0ffe

View file

@ -112,4 +112,9 @@
(fn [out c]
(render-char c flf out))
output
s)))
s)))
(defn render [^String s flf]
(->> (str/split s #"\n")
(map #(render-line % flf))
(apply concat)))