diff options
| author | Richard M. Stallman | 1998-02-02 00:18:33 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-02-02 00:18:33 +0000 |
| commit | 7e97482bb7e1567bba734da8b8aedaa4abe3a816 (patch) | |
| tree | 4e5d77e07540e4847fa5a9e5af7cb4e32be7a7aa /lisp/isearch.el | |
| parent | 7ee906030a54e28d2f65e17fdfc7ac5654640ee4 (diff) | |
| download | emacs-7e97482bb7e1567bba734da8b8aedaa4abe3a816.tar.gz emacs-7e97482bb7e1567bba734da8b8aedaa4abe3a816.zip | |
(isearch-range-invisible): Avoid infinite loop when search-invisible is nil.
Diffstat (limited to 'lisp/isearch.el')
| -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." | |||
| 1625 | ;; It makes sense to append to the open | 1625 | ;; It makes sense to append to the open |
| 1626 | ;; overlays list only if we know that this is | 1626 | ;; overlays list only if we know that this is |
| 1627 | ;; t. | 1627 | ;; t. |
| 1628 | (setq crt-overlays (append ov-list crt-overlays)))) | 1628 | (setq crt-overlays (append ov-list crt-overlays))))) |
| 1629 | (goto-char (next-overlay-change (point)))))) | 1629 | (goto-char (next-overlay-change (point))))) |
| 1630 | ;; See if invisibility reaches up thru END. | 1630 | ;; See if invisibility reaches up thru END. |
| 1631 | (if (>= (point) end) | 1631 | (if (>= (point) end) |
| 1632 | (if (and (not (null can-be-opened)) (consp crt-overlays)) | 1632 | (if (and (not (null can-be-opened)) (consp crt-overlays)) |