Possible bug in `hide-other'.

Possible bug in `hide-other'.

[Luc Teirlinck]

Do `emacs -q', `C-h n', `C-s ***'.

Unless there is a change in the NEWS between now and when you try this
out, you will see:

  ** New features in evaluation commands

  +++
  *** The function `eval-defun' (C-M-x) called on defface reinitializes
  the face to the value specified in the defface expression.

  *** Typing C-x C-e twice prints the value of the integer result
  in additional formats (octal, hexadecimal, character) specified
  by the new function `eval-expression-print-format'.  The same
  function also defines the result format for `eval-expression' (M-:),
  `eval-print-last-sexp' (C-j) and some edebug evaluation functions.

Point is after the third star on the line:

*** The function `eval-defun' (C-M-x) called on defface reinitializes

Now do `C-c C-o".

We see:

  * Changes in Emacs 21.4
  ...
  *** The function `eval-defun' (C-M-x) called on defface reinitializes
  the face to the value specified in the defface expression.

Why was the line:

  ** New features in evaluation commands

hidden?

Docstring of `hide-other':

  hide-other is an interactive compiled Lisp function in `outline'.
  (hide-other)

  Hide everything except current body and parent and top-level headings.

The parent is clearly exempt from being hidden.  I even believe that
the docstring really means "parent_s_" (or ancestors).

Sincerely,

Luc.

Re: Possible bug in `hide-other'.

[Richard Stallman]

Does this fix it?

*** outline.el	10 May 2004 12:26:21 -0400	1.7
--- outline.el	26 Sep 2004 10:50:01 -0400	
***************
*** 808,814 ****
      (save-excursion
        (outline-back-to-heading t)
        (show-entry)
!       (while (condition-case nil (progn (outline-up-heading 1) (not (bobp)))
  	       (error nil))
  	(outline-flag-region (1- (point))
  			     (save-excursion (forward-line 1) (point))
--- 808,814 ----
      (save-excursion
        (outline-back-to-heading t)
        (show-entry)
!       (while (condition-case nil (progn (outline-up-heading 1 t) (not (bobp)))
  	       (error nil))
  	(outline-flag-region (1- (point))
  			     (save-excursion (forward-line 1) (point))

Re: Possible bug in `hide-other'.

[Luc Teirlinck]

Richard Stallman wrote:
   
   Does this fix it?

   *** outline.el	10 May 2004 12:26:21 -0400	1.7
   --- outline.el	26 Sep 2004 10:50:01 -0400	
   ***************
   *** 808,814 ****
	 (save-excursion
	   (outline-back-to-heading t)
	   (show-entry)
   !       (while (condition-case nil (progn (outline-up-heading 1) (not (bobp)))
		  (error nil))
	   (outline-flag-region (1- (point))
				(save-excursion (forward-line 1) (point))
   --- 808,814 ----
	 (save-excursion
	   (outline-back-to-heading t)
	   (show-entry)
   !       (while (condition-case nil (progn (outline-up-heading 1 t) (not (bobp)))
		  (error nil))
	   (outline-flag-region (1- (point))
				(save-excursion (forward-line 1) (point))

Yes, it does.

Sincerely,

Luc.