aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2006-12-04 00:31:04 +0000
committerRichard M. Stallman2006-12-04 00:31:04 +0000
commit49bb7f019f6537ffcd6776fc02b7c77ea7cfca2f (patch)
tree13a4e50bba88c8474906e069ac27a1addb1b5ef9
parentb36e96c8f3454e0909ef63805bf2e8fa08319bbd (diff)
downloademacs-49bb7f019f6537ffcd6776fc02b7c77ea7cfca2f.tar.gz
emacs-49bb7f019f6537ffcd6776fc02b7c77ea7cfca2f.zip
(outline-end-of-subtree): Don't leave an empty
line hidden as we would a real next heading.
-rw-r--r--lisp/outline.el3
1 files changed, 2 insertions, 1 deletions
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."
894 (or first (> (funcall outline-level) level))) 894 (or first (> (funcall outline-level) level)))
895 (setq first nil) 895 (setq first nil)
896 (outline-next-heading)) 896 (outline-next-heading))
897 (if (bolp) 897 (if (and (bolp) (not (eolp)))
898 ;; We stopped at a nonempty line (the next heading).
898 (progn 899 (progn
899 ;; Go to end of line before heading 900 ;; Go to end of line before heading
900 (forward-char -1) 901 (forward-char -1)