                 :key-released
                 (fn [e] (update-buttons! text-group text-area)))
       ; install completer
-      (install-completer! text-area completer)
+      (when completer
+        (install-completer! text-area completer))
       ; enable/disable buttons while typing
       (.addDocumentListener (.getDocument text-area)
                             (reify DocumentListener

          (keyPressed [this e]
            (when (and @shortcuts/is-down?
                       (contains? consume-commands (.getKeyCode e)))
              (.consume e)))))
      (install-completer! completer))
    (JConsole. text-area)))

(defn init-paredit!

  []
  (let [text-area (create-text-area)
        extension "clj"
        consume-commands #{KeyEvent/VK_Z KeyEvent/VK_Y}]
    (doto text-area
      (.setSyntaxEditingStyle (get styles extension))
