branch: externals/elpa
commit 209b227c4ef9f4ececbcc87c64b8d4b760c52994
Author: Paul M. Rodriguez <paulmrodrig...@gmail.com>
Commit: GitHub <nore...@github.com>
Fix #524: provide suitable default to M-x eglot-rename
Copyright-paperwork-exempt: Yes
* eglot (eglot-rename): Provide a default value.
---
eglot.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/eglot.el b/eglot.el
index a4ba1f9..64543d7 100644
--- a/eglot.el
+++ b/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
