diff options
author | Bozhidar Batsov <bozhidar@batsov.com> | 2017-12-19 20:27:19 +0200 |
---|---|---|
committer | Bozhidar Batsov <bozhidar@batsov.com> | 2017-12-19 20:27:19 +0200 |
commit | 677ec20a6c300e33686526175325dc7dafee7953 (patch) | |
tree | d31db023d543633ee3747ec333b19a1440b9b337 /cider-repl.el | |
parent | 0eaeaf40e358686011b4502eeca7c4a768d93aa3 (diff) |
[Fix #2112] Add a new interactive command cider-find-keyword
It basically finds the first usage of the namespace-qualified keywords.
For `::other.namespace/foo` this command would go to `other.namespace`
and then find the first mention of `:foo` in it.
Diffstat (limited to 'cider-repl.el')
-rw-r--r-- | cider-repl.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/cider-repl.el b/cider-repl.el index ed8b033a..a2445ffe 100644 --- a/cider-repl.el +++ b/cider-repl.el @@ -1431,6 +1431,7 @@ constructs." (declare-function cider-find-resource "cider-interaction") (declare-function cider-restart "cider-interaction") (declare-function cider-find-ns "cider-interaction") +(declare-function cider-find-keyword "cider-interaction") (declare-function cider-switch-to-last-clojure-buffer "cider-mode") (defvar cider-repl-mode-map @@ -1440,6 +1441,7 @@ constructs." (define-key map (kbd "C-c C-t") 'cider-test-commands-map) (define-key map (kbd "M-.") #'cider-find-var) (define-key map (kbd "C-c C-.") #'cider-find-ns) + (define-key map (kbd "C-c C-:") #'cider-find-keyword) (define-key map (kbd "M-,") #'cider-pop-back) (define-key map (kbd "C-c M-.") #'cider-find-resource) (define-key map (kbd "RET") #'cider-repl-return) @@ -1486,6 +1488,7 @@ constructs." ("Find" ["Find definition" cider-find-var] ["Find resource" cider-find-resource] + ["Find keyword" cider-find-keyword] ["Go back" cider-pop-back]) "--" ["Switch to Clojure buffer" cider-switch-to-last-clojure-buffer] |