Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-06-14 04:21:24 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fix eglot-specific commands

Browse source 
* lisp/progmodes/eglot.el (eglot-find-declaration)
(eglot-find-implementation, eglot-find-typeDefinition):
Fix the last argument in xref-find-all-definitions calls.
This commit is contained in:
Dmitry Gutov 2023-11-27 17:17:13 +02:00
parent 93ee5cd076
commit a5487e92e9
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/progmodes/eglot.el
View file

@ -2957,17 +2957,17 @@ If BUFFER, switch to it before."
(defun eglot-find-declaration ()
"Find declaration for SYM, the identifier at point."
(interactive)
(xref-find-all-definitions "LSP identifier at point" 'eglot--xref-declaration))
(xref-find-all-definitions "LSP identifier at point" "declaration"))
(defun eglot-find-implementation ()
"Find implementation for SYM, the identifier at point."
(interactive)
(xref-find-all-definitions "LSP identifier at point" 'eglot--xref-implementation))
(xref-find-all-definitions "LSP identifier at point" "implementation"))
(defun eglot-find-typeDefinition ()
"Find type definition for SYM, the identifier at point."
(interactive)
(xref-find-all-definitions "LSP identifier at point" 'eglot--xref-type-definition))
(xref-find-all-definitions "LSP identifier at point" "type-definition"))
(cl-defmethod xref-backend-definitions ((_backend (eql eglot)) identifier)
(let ((probe (eglot--recover-workspace-symbol-meta identifier)))