From 15fd7d5da5b7001337c87edd795c747e61894a81 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 12 Dec 2004 22:06:30 +0000 Subject: [PATCH] (replace-match-maybe-edit): Doc fix. (perform-replace): Don't call `replace-highlight' when automatic replacement is requested in literal mode, since it is intended only to highlight words during entering a new replacement string for \? in non-literal mode. --- lisp/replace.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/replace.el b/lisp/replace.el index 8a5c0a9680..933a0004ce 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -1214,7 +1214,7 @@ but coerced to the correct value of INTEGERS." (defun replace-match-maybe-edit (newtext fixedcase literal noedit match-data) "Make a replacement with `replace-match', editing `\\?'. -NEXTEXT, FIXEDCASE, LITERAL are just passed on. If NOEDIT is true, no +NEWTEXT, FIXEDCASE, LITERAL are just passed on. If NOEDIT is true, no check for `\\?' is made to save time. MATCH-DATA is used for the replacement. In case editing is done, it is changed to use markers. @@ -1380,7 +1380,7 @@ make, or the user didn't cancel the call." (if (not query-flag) (let ((inhibit-read-only query-replace-skip-read-only)) - (unless noedit + (unless (or literal noedit) (replace-highlight (nth 0 real-match-data) (nth 1 real-match-data))) (setq noedit -- 2.20.1