1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-16 17:19:41 +00:00

(isearch-range-invisible): Handle the case that

buffer-invisibility-spec is t (i.e. not a list).
This commit is contained in:
Kenichi Handa 1998-06-20 02:59:51 +00:00
parent 7678db2590
commit de207f5af3

View File

@ -1619,8 +1619,10 @@ If there is no completion possible, say so and continue searching."
(while overlays
(setq o (car overlays)
invis-prop (overlay-get o 'invisible))
(if (or (memq invis-prop buffer-invisibility-spec)
(assq invis-prop buffer-invisibility-spec))
(if (if (eq buffer-invisibility-spec t)
invis-prop
(or (memq invis-prop buffer-invisibility-spec)
(assq invis-prop buffer-invisibility-spec)))
(if (overlay-get o 'isearch-open-invisible)
(setq ov-list (cons o ov-list))
;; We found one overlay that cannot be