# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1137693098 0
# Node ID 4747977f1afa566e4a03fc5be8bf381278261460
# Parent  627ba9ac2b0fe4154beab1345f0b1600cbf2e242
(hide-leaves): Don't call outline-end-of-heading.
Fixes bug reported in Nov 2005.

diff -r 627ba9ac2b0f -r 4747977f1afa lisp/outline.el
--- a/lisp/outline.el	Thu Jan 19 17:50:42 2006 +0000
+++ b/lisp/outline.el	Thu Jan 19 17:51:38 2006 +0000
@@ -803,11 +803,11 @@
   (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 ()