lang/clojure: fix lookup-def handler #1360
This commit is contained in:
parent
4506fb9223
commit
237e14ae7b
2 changed files with 7 additions and 1 deletions
|
@ -12,3 +12,9 @@
|
||||||
"TODO"
|
"TODO"
|
||||||
(interactive)
|
(interactive)
|
||||||
(cider-switch-to-repl-buffer t))
|
(cider-switch-to-repl-buffer t))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun +clojure-lookup-symbol (identifier)
|
||||||
|
"A lookup handler for `cider-find-dwim'.
|
||||||
|
This is necessary to fix its inability to capture the full symbol at point."
|
||||||
|
(cider-find-dwim identifier))
|
||||||
|
|
|
@ -13,7 +13,7 @@
|
||||||
(set-repl-handler! 'clojure-mode #'+clojure/repl)
|
(set-repl-handler! 'clojure-mode #'+clojure/repl)
|
||||||
(set-eval-handler! 'clojure-mode #'cider-eval-region)
|
(set-eval-handler! 'clojure-mode #'cider-eval-region)
|
||||||
(set-lookup-handlers! 'cider-mode
|
(set-lookup-handlers! 'cider-mode
|
||||||
:definition #'cider-find-dwim
|
:definition #'+clojure-lookup-symbol
|
||||||
:documentation #'cider-doc)
|
:documentation #'cider-doc)
|
||||||
(add-hook 'cider-mode-hook #'eldoc-mode)
|
(add-hook 'cider-mode-hook #'eldoc-mode)
|
||||||
:config
|
:config
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue