emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/symbol-overlay 6076319f57 079/152: add default text when r


From: ELPA Syncer
Subject: [nongnu] elpa/symbol-overlay 6076319f57 079/152: add default text when replacing
Date: Thu, 7 Jul 2022 12:04:16 -0400 (EDT)

branch: elpa/symbol-overlay
commit 6076319f57a7e8dbf2fe11250def5a3fa3c0c854
Author: wolray <290061869@qq.com>
Commit: wolray <290061869@qq.com>

    add default text when replacing
---
 symbol-overlay.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/symbol-overlay.el b/symbol-overlay.el
index 4dd471b67a..bdbc0168be 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -490,7 +490,7 @@ DIR must be 1 or -1."
       (and scope (user-error "Query-replace invalid in scope"))
       (beginning-of-thing 'symbol)
       (push-mark nil t)
-      (setq txt (read-string "Replacement: ")
+      (setq txt (read-string "Replacement: " (substring symbol 3 -3))
            new (symbol-overlay-get-symbol txt)
            defaults (cons symbol txt))
       (unless (string= new symbol)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]