From de207f5af382221f32166ce186043b52311a0844 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sat, 20 Jun 1998 02:59:51 +0000 Subject: [PATCH] (isearch-range-invisible): Handle the case that buffer-invisibility-spec is t (i.e. not a list). --- lisp/isearch.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index 05710466adc..007801bb946 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -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 -- 2.39.2