From c37c30f134e03d0d982aef714b94bda56fe8d860 Mon Sep 17 00:00:00 2001 From: "Paul M. Rodriguez" Date: Fri, 21 Aug 2020 17:27:40 -0500 Subject: [PATCH] Provide suitable default to m-x eglot-rename Copyright-paperwork-exempt: Yes * eglot (eglot-rename): Provide a default value. GitHub-reference: fix https://github.com/joaotavora/eglot/issues/524 --- lisp/progmodes/eglot.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index a4ba1f9f934..64543d7bb87 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -2477,7 +2477,9 @@ is not active." (defun eglot-rename (newname) "Rename the current symbol to NEWNAME." (interactive - (list (read-from-minibuffer (format "Rename `%s' to: " (symbol-at-point))))) + (list (read-from-minibuffer (format "Rename `%s' to: " (symbol-at-point)) + nil nil nil nil + (symbol-name (symbol-at-point))))) (unless (eglot--server-capable :renameProvider) (eglot--error "Server can't rename!")) (eglot--apply-workspace-edit -- 2.39.2