(perform-replace): Highlight the match even in

non-query mode if there is potential replace string editing.
This commit is contained in:
David Kastrup 2004-06-26 18:35:18 +00:00
parent 15cc764cd1
commit cb05ca25df
2 changed files with 10 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2004-06-26 David Kastrup <dak@gnu.org>
* replace.el (perform-replace): Highlight the match even in
non-query mode if there is potential replace string editing.
2004-06-26 Kai Grossjohann <kai.grossjohann@gmx.net>
* net/tramp.el (tramp-handle-file-remote-p): New implementation to

View file

@ -1328,7 +1328,11 @@ make, or the user didn't cancel the call."
replace-count)
noedit nil))
(if (not query-flag)
(let ((inhibit-read-only query-replace-skip-read-only))
(let ((inhibit-read-only
query-replace-skip-read-only))
(unless noedit
(replace-highlight (nth 0 real-match-data)
(nth 1 real-match-data)))
(setq noedit
(replace-match-maybe-edit
next-replacement nocasify literal