(isearch-range-invisible): Avoid infinite loop when search-invisible is nil.

7e97482b · Richard M. Stallman · 7ee90603 · 7e97482b
Commit 7e97482b authored Feb 02, 1998 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/isearch.el lisp/isearch.el +2 -2

No files found.
--- 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))