From 7e97482bb7e1567bba734da8b8aedaa4abe3a816 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 2 Feb 1998 00:18:33 +0000 Subject: [PATCH] (isearch-range-invisible): Avoid infinite loop when search-invisible is nil. --- lisp/isearch.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/isearch.el b/lisp/isearch.el index 920a4be082d..1bc4341d1cc 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el @@ -1625,8 +1625,8 @@ If there is no completion possible, say so and continue searching." ;; It makes sense to append to the open ;; overlays list only if we know that this is ;; t. - (setq crt-overlays (append ov-list crt-overlays)))) - (goto-char (next-overlay-change (point)))))) + (setq crt-overlays (append ov-list crt-overlays))))) + (goto-char (next-overlay-change (point))))) ;; See if invisibility reaches up thru END. (if (>= (point) end) (if (and (not (null can-be-opened)) (consp crt-overlays)) -- 2.39.2