Mercurial > emacs
changeset 56262:29d03615f533
(perform-replace): Highlight the match even in
non-query mode if there is potential replace string editing.
| author | David Kastrup <dak@gnu.org> |
|---|---|
| date | Sat, 26 Jun 2004 18:35:18 +0000 |
| parents | d863bc830907 |
| children | 1b78563a75d6 |
| files | lisp/ChangeLog lisp/replace.el |
| diffstat | 2 files changed, 10 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Sat Jun 26 15:28:33 2004 +0000 +++ b/lisp/ChangeLog Sat Jun 26 18:35:18 2004 +0000 @@ -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
--- a/lisp/replace.el Sat Jun 26 15:28:33 2004 +0000 +++ b/lisp/replace.el Sat Jun 26 18:35:18 2004 +0000 @@ -1328,7 +1328,11 @@ 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