From a5487e92e9978da5426dcaf3ddc97383b905d844 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Mon, 27 Nov 2023 17:17:13 +0200 Subject: Fix eglot-specific commands * lisp/progmodes/eglot.el (eglot-find-declaration) (eglot-find-implementation, eglot-find-typeDefinition): Fix the last argument in xref-find-all-definitions calls. --- lisp/progmodes/eglot.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index 65bee6118a2..4e3129a79c2 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -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))) -- cgit v1.2.1