Mercurial > emacs
changeset 74384:4bb58e866a28
(outline-end-of-subtree): Don't leave an empty
line hidden as we would a real next heading.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 04 Dec 2006 00:31:04 +0000 |
parents | 091b7540d54d |
children | fcc9e01e9e6d |
files | lisp/outline.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/outline.el Mon Dec 04 00:30:11 2006 +0000 +++ b/lisp/outline.el Mon Dec 04 00:31:04 2006 +0000 @@ -894,7 +894,8 @@ (or first (> (funcall outline-level) level))) (setq first nil) (outline-next-heading)) - (if (bolp) + (if (and (bolp) (not (eolp))) + ;; We stopped at a nonempty line (the next heading). (progn ;; Go to end of line before heading (forward-char -1)