diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-05-25 04:41:21 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-05-25 04:41:21 +0000 |
| commit | e6a9aec70b6f0bdfa7ed2bde048e4c84aee213ca (patch) | |
| tree | 4e66da46431ee614036ad11ce977047208c9a72e /lisp/allout.el | |
| parent | 92bab0111edffb63bdd5755c58138dca5be8356a (diff) | |
| download | emacs-e6a9aec70b6f0bdfa7ed2bde048e4c84aee213ca.tar.gz | |
(outline-chart-subtree): Include outline-next-heading in loop conditions
to detect end-of-buffer (and avoid infinite loop).
Diffstat (limited to 'lisp/allout.el')
| -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." (or (outline-next-sibling curr-depth) ;; or no more siblings - proceed to ;; next heading at lesser depth: - (while (<= curr-depth - (outline-recent-depth)) - (outline-next-heading))) + (while (and (<= curr-depth + (outline-recent-depth)) + (outline-next-heading)))) (outline-next-heading))) ((and (< prev-depth curr-depth) |