From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 19 Jan 2006 17:51:38 +0000 (+0000)
Subject: (hide-leaves): Don't call outline-end-of-heading.
X-Git-Tag: emacs-pretest-22.0.90~4684
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d8b5b5d578053abfef46335e090b28ddf669f50d;p=emacs.git

(hide-leaves): Don't call outline-end-of-heading.
Fixes bug reported in Nov 2005.
---

diff --git a/lisp/outline.el b/lisp/outline.el
index 8a05aaf0cd9..8baa9f102ea 100644
--- a/lisp/outline.el
+++ b/lisp/outline.el
@@ -803,11 +803,11 @@ Show the heading too, if it is currently invisible."
   (outline-flag-subtree t))
 
 (defun hide-leaves ()
-  "Hide all body after this heading at deeper levels."
+  "Hide the body after this heading and at deeper levels."
   (interactive)
   (save-excursion
     (outline-back-to-heading)
-    (outline-end-of-heading)
+;;    (outline-end-of-heading)
     (hide-region-body (point) (progn (outline-end-of-subtree) (point)))))
 
 (defun show-subtree ()