Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
(defn preview-essay-body []
(let [body-el (dom/getElement "body_id")
preview-el (dom/getElement "preview_pane")
b-txt (.value body-el)
safe "false"]
(dom/removeChildren preview-el)
(dom/appendChild
preview-el
(dom/htmlToDocumentFragment
(js* "new Showdown.converter().makeHtml(~{b-txt},~{safe})")))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.