                    (if (italicize-fn) "italic" "normal")
                    (-> e-path io/file .getName)))
          (cons "<center>PgUp PgDn</center>")
-         (clojure.string/join "<br/>")
+         (join "<br/>")
          shortcuts/wrap-hint-text
          (s/editor-pane :editable? false :content-type "text/html" :text)
          (shortcuts/create-hint! true editor-pane)

                 (indent-mode old-text old-x old-line))
        new-text (:text result)
        new-x (:x result)
        new-pos (+ old-pos (- new-x old-x))]
    (.setText text-area new-text)
    (.setCaretPosition text-area new-pos)))

(defn init-parinfer!
  [text-area extension]
  (when (contains? utils/clojure-exts extension)
    ; use paren mode to preprocess the code
    (let [old-text (.getText text-area)]

           [org.fife.ui.rsyntaxtextarea FileLocation TextEditorPane Theme]
           [org.fife.ui.rtextarea RTextScrollPane SearchContext SearchEngine
            SearchResult]
           [com.oakmac.parinfer Parinfer ParinferResult]))

(def ^:const min-font-size 8)
(def editors (atom (flatland/ordered-map)))
