(outline-end-of-subtree): Don't leave an empty

line hidden as we would a real next heading.

(outline-end-of-subtree): Don't leave an empty
line hidden as we would a real next heading.
49bb7f01 · Richard M. Stallman · b36e96c8 · 49bb7f01
Commit 49bb7f01 authored Dec 04, 2006 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/outline.el lisp/outline.el +2 -1

No files found.
--- 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)