(isearch-range-invisible): Avoid infinite loop when search-invisible is nil.
authorRichard M. Stallman <rms@gnu.org>
Mon, 2 Feb 1998 00:18:33 +0000 (00:18 +0000)
committerRichard M. Stallman <rms@gnu.org>
Mon, 2 Feb 1998 00:18:33 +0000 (00:18 +0000)
lisp/isearch.el

index 920a4be..1bc4341 100644 (file)
@@ -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))