diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-02-02 00:18:33 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-02-02 00:18:33 +0000 |
| commit | 77080f14d98ebeb1f255e1964319572a67fee800 (patch) | |
| tree | 5b9b8abb80f2dc147a4cb904400c20fd73940cd0 | |
| parent | c07c58b350546c02317eee1058dcd6d3c5db2862 (diff) | |
| download | emacs-77080f14d98ebeb1f255e1964319572a67fee800.tar.gz | |
(isearch-range-invisible): Avoid infinite loop when search-invisible is nil.
| -rw-r--r-- | lisp/isearch.el | 4 |
1 files 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)) |