add render-out function
This commit is contained in:
parent
e3e0e8b67b
commit
f164b57aee
|
@ -121,3 +121,10 @@
|
|||
(->> (str/split s #"\n")
|
||||
(map #(render-line % flf))
|
||||
(apply concat)))
|
||||
|
||||
(defn render-out [flf & more]
|
||||
(let [s (str/join " " more)
|
||||
lines (render s flf)]
|
||||
(->> lines
|
||||
(str/join \newline)
|
||||
(clojure.core/print))))
|
Loading…
Reference in a new issue