changeset 22517:7c42ab0fcb30

(isearch-range-invisible): Handle the case that buffer-invisibility-spec is t (i.e. not a list).
author Kenichi Handa <handa@m17n.org>
date Sat, 20 Jun 1998 02:59:51 +0000
parents 31e6e5b66fea
children 64b8166a9747
files lisp/isearch.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/isearch.el	Sat Jun 20 02:58:52 1998 +0000
+++ b/lisp/isearch.el	Sat Jun 20 02:59:51 1998 +0000
@@ -1619,8 +1619,10 @@
 		   (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