From 49bb7f019f6537ffcd6776fc02b7c77ea7cfca2f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 4 Dec 2006 00:31:04 +0000 Subject: [PATCH] (outline-end-of-subtree): Don't leave an empty line hidden as we would a real next heading. --- lisp/outline.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/outline.el b/lisp/outline.el index 0cd6eaa7186..0ec527060a1 100644 --- a/lisp/outline.el +++ b/lisp/outline.el @@ -894,7 +894,8 @@ Show the heading too, if it is currently invisible." (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) -- 2.39.2