diff options
| author | Richard M. Stallman | 1994-05-25 04:41:21 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-05-25 04:41:21 +0000 |
| commit | e6a9aec70b6f0bdfa7ed2bde048e4c84aee213ca (patch) | |
| tree | 4e66da46431ee614036ad11ce977047208c9a72e | |
| parent | 92bab0111edffb63bdd5755c58138dca5be8356a (diff) | |
| download | emacs-e6a9aec70b6f0bdfa7ed2bde048e4c84aee213ca.tar.gz emacs-e6a9aec70b6f0bdfa7ed2bde048e4c84aee213ca.zip | |
(outline-chart-subtree): Include outline-next-heading in loop conditions
to detect end-of-buffer (and avoid infinite loop).
| -rw-r--r-- | lisp/allout.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/allout.el b/lisp/allout.el index 8f87eca6666..dde6c4cdca4 100644 --- a/lisp/allout.el +++ b/lisp/allout.el | |||
| @@ -1453,9 +1453,9 @@ starting point, and PREV-DEPTH is depth of prior topic." | |||
| 1453 | (or (outline-next-sibling curr-depth) | 1453 | (or (outline-next-sibling curr-depth) |
| 1454 | ;; or no more siblings - proceed to | 1454 | ;; or no more siblings - proceed to |
| 1455 | ;; next heading at lesser depth: | 1455 | ;; next heading at lesser depth: |
| 1456 | (while (<= curr-depth | 1456 | (while (and (<= curr-depth |
| 1457 | (outline-recent-depth)) | 1457 | (outline-recent-depth)) |
| 1458 | (outline-next-heading))) | 1458 | (outline-next-heading)))) |
| 1459 | (outline-next-heading))) | 1459 | (outline-next-heading))) |
| 1460 | 1460 | ||
| 1461 | ((and (< prev-depth curr-depth) | 1461 | ((and (< prev-depth curr-depth) |