selectrum: add consult-lsp

- add `consult-lsp` to tools/lsp if the selectrum module is active
- add the selectrum/consult version of workspace symbol search under `SPC c j/J`
- update TODO.org
This commit is contained in:
Itai Y. Efrat 2021-04-25 17:10:07 +03:00
parent 3c55105622
commit 750721492c
4 changed files with 12 additions and 3 deletions

View file

@ -10,3 +10,5 @@ https://github.com/minad/marginalia/issues/59
In ivy, backspace on =/foo/bar/!= (where =!= is the cursor) leads to =/foo/!= In ivy, backspace on =/foo/bar/!= (where =!= is the cursor) leads to =/foo/!=
In selectrum, it leads to =/foo/bar!= In selectrum, it leads to =/foo/bar!=
** TODO =SPC s B= ** TODO =SPC s B=
* PROJ Other
** TODO bind =consult-lsp-diagnostics= to something?

View file

@ -12,6 +12,8 @@
(package! consult :pin "846c715ee1df94292a9bb2467810bd7959ccf078") (package! consult :pin "846c715ee1df94292a9bb2467810bd7959ccf078")
(when (featurep! :checkers syntax) (when (featurep! :checkers syntax)
(package! consult-flycheck :pin "846c715ee1df94292a9bb2467810bd7959ccf078")) (package! consult-flycheck :pin "846c715ee1df94292a9bb2467810bd7959ccf078"))
(when (featurep! :tools lsp)
(package! consult-lsp :pin "ed3cfd2e67fc5117819c0c739814780bb4c2d716"))
(package! embark :pin "5f3097824f8c3d17bcd70c4e4ce597bcfcf2196f") (package! embark :pin "5f3097824f8c3d17bcd70c4e4ce597bcfcf2196f")
(package! embark-consult :pin "5f3097824f8c3d17bcd70c4e4ce597bcfcf2196f") (package! embark-consult :pin "5f3097824f8c3d17bcd70c4e4ce597bcfcf2196f")

View file

@ -54,13 +54,15 @@
(:when (featurep! :completion helm) (:when (featurep! :completion helm)
:desc "Jump to symbol in current workspace" "j" #'helm-lsp-workspace-symbol :desc "Jump to symbol in current workspace" "j" #'helm-lsp-workspace-symbol
:desc "Jump to symbol in any workspace" "J" #'helm-lsp-global-workspace-symbol) :desc "Jump to symbol in any workspace" "J" #'helm-lsp-global-workspace-symbol)
(:when (featurep! :completion selectrum)
:desc "Jump to symbol in current workspace" "j" #'consult-lsp-symbols
:desc "Jump to symbol in any workspace" "J" (cmd! #'consult-lsp-symbols '(4)))
(:when (featurep! :ui treemacs +lsp) (:when (featurep! :ui treemacs +lsp)
:desc "Errors list" "X" #'lsp-treemacs-errors-list :desc "Errors list" "X" #'lsp-treemacs-errors-list
:desc "Incoming call hierarchy" "y" #'lsp-treemacs-call-hierarchy :desc "Incoming call hierarchy" "y" #'lsp-treemacs-call-hierarchy
:desc "Outgoing call hierarchy" "Y" (cmd!! #'lsp-treemacs-call-hierarchy t) :desc "Outgoing call hierarchy" "Y" (cmd!! #'lsp-treemacs-call-hierarchy t)
:desc "References tree" "R" (cmd!! #'lsp-treemacs-references t) :desc "References tree" "R" (cmd!! #'lsp-treemacs-references t)
:desc "Symbols" "S" #'lsp-treemacs-symbols)) :desc "Symbols" "S" #'lsp-treemacs-symbols))
(:when (featurep! :tools lsp +eglot) (:when (featurep! :tools lsp +eglot)
:desc "LSP Execute code action" "a" #'eglot-code-actions :desc "LSP Execute code action" "a" #'eglot-code-actions
:desc "LSP Rename" "r" #'eglot-rename :desc "LSP Rename" "r" #'eglot-rename

View file

@ -393,6 +393,9 @@
(:when (featurep! :completion helm) (:when (featurep! :completion helm)
:desc "Jump to symbol in current workspace" "j" #'helm-lsp-workspace-symbol :desc "Jump to symbol in current workspace" "j" #'helm-lsp-workspace-symbol
:desc "Jump to symbol in any workspace" "J" #'helm-lsp-global-workspace-symbol) :desc "Jump to symbol in any workspace" "J" #'helm-lsp-global-workspace-symbol)
(:when (featurep! :completion selectrum)
:desc "Jump to symbol in current workspace" "j" #'consult-lsp-symbols
:desc "Jump to symbol in any workspace" "J" (cmd! #'consult-lsp-symbols '(4)))
(:when (featurep! :ui treemacs +lsp) (:when (featurep! :ui treemacs +lsp)
:desc "Errors list" "X" #'lsp-treemacs-errors-list :desc "Errors list" "X" #'lsp-treemacs-errors-list
:desc "Incoming call hierarchy" "y" #'lsp-treemacs-call-hierarchy :desc "Incoming call hierarchy" "y" #'lsp-treemacs-call-hierarchy