# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1102889190 0
# Node ID 0b183affb969ad6c83917bff1cdabed940cd3692
# Parent  f0538bd79bc1db2ae1919525720d1006b7cc4833
(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.

diff -r f0538bd79bc1 -r 0b183affb969 lisp/replace.el
--- a/lisp/replace.el	Sun Dec 12 21:57:28 2004 +0000
+++ b/lisp/replace.el	Sun Dec 12 22:06:30 2004 +0000
@@ -1214,7 +1214,7 @@
 
 (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 @@
 	    (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