mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/replace.el (perform-replace): Avoid `isearch-range-invisible'

Browse source 
call when `query-flag' is nil and `search-invisible' is non-nil.

Fixes: debbugs:11746
This commit is contained in:
Juri Linkov 2013-05-31 02:29:42 +03:00
parent 2a8bed1c02
commit ab1bdce51e
2 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2013-05-30 Juri Linkov <juri@jurta.org>
* replace.el (perform-replace): Avoid `isearch-range-invisible'
call when `query-flag' is nil and `search-invisible' is non-nil.
(Bug#11746)
2013-05-30 Glenn Morris <rgm@gnu.org>
* progmodes/cc-bytecomp.el (cc-bytecomp-noruntime-functions): New.

3
lisp/replace.el
View file

@ -2093,6 +2093,9 @@ make, or the user didn't cancel the call."
(setq skip-filtered-count (1+ skip-filtered-count)))
;; Optionally ignore invisible matches.
((not (or (eq search-invisible t)
;; Don't open overlays for automatic replacements.
(and (not query-flag) search-invisible)
;; Open hidden overlays for interactive replacements.
(not (isearch-range-invisible
(nth 0 real-match-data) (nth 1 real-match-data)))))
(setq skip-invisible-count (1+ skip-invisible-count)))