                                     :redo-button redo-file
                                     :font-dec-button decrease-font-size
                                     :font-inc-button increase-font-size
-                                    :doc-button run-completion
+                                    :doc-button do-completion-fn
                                     :paredit-button toggle-paredit
                                     :find-field focus-on-find
                                     :replace-field focus-on-replace})

                              (s/button :id :doc-button
                                        :text (utils/get-string :doc)
                                        :focusable? false
                                        :visible? (not (nil? completion))
                                        :listen [:action run-completion])
                              (s/toggle :id :paredit-button
                                        :text (utils/get-string :paredit)
                                        :focusable? false

    (let [is-clojure? (contains? clojure-exts extension)
          text-area (get-text-area)
          toggle-paredit-fn (when is-clojure? (paredit/get-toggle-fn text-area))
          completer (get-completer text-area extension)
          do-completion-fn (fn [_]
                             (s/request-focus! text-area)
                             (when completer (.doCompletion completer)))
          btn-group (ui/wrap-panel
                      :items [(s/button :id :save-button
                                        :text (utils/get-string :save)
