(defn
init-example-editor
[elem example]
(when-let
[paren-soup (or (.querySelector elem ".paren-soup") elem)]
(when-let
[content (.querySelector paren-soup ".content")]
(set! (.-contentEditable content) true))
(ps/init
paren-soup
(js->clj
{:compiler-fn
(if
(= :clj (:type @*state))
(partial clj-compiler-fn example)
(partial cljs-compiler-fn example))}))))