narrow-to-defun has changed since 21.3

[Eric Hanchrow]

This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English if possible, because the Emacs maintainers
usually do not have translators to read other languages for them.

Your bug report will be posted to the address@hidden mailing list.

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

I'm not certain this is a bug, but it's annoying; I still haven't
gotten used to it.

To see it: save the below into a file named bug.el:

============================================================
(setq inhibit-startup-message t)
(switch-to-buffer "narrow-to-defun test")
(emacs-lisp-mode)
(insert "(defun bad ()
  \"Oh no!  You shouldn't be seeing me.\")

(defun good ()
  \"If you see only me, that's good.\")
")
(goto-line 4)
(beginning-of-line)
(narrow-to-defun)

============================================================

Run emacs -q --no-site-file --load=bug.el

Notice that you see the function that says "Oh no!  You shouldn't be
seeing me."

Now for comparison, run /usr/bin/emacs21 -q --no-site-file
--load=bug.el, and notice that you now see the other function.

So certainly the behavior has changed.  The new behavior annoys me
because I frequently do narrow-do-defun when point is (like in the
test above) just before the first paren of a defun, and I expect to
see _that_ defun after narrowing, but now I only see the blank line
preceding the function.

In GNU Emacs 21.3.50.3 (i686-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2004-05-12 on debian
configured using `configure '--prefix=/usr/local/stow/emacs-cvs' 'CFLAGS=-g 
-O0''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: nil
  locale-coding-system: nil
  default-enable-multibyte-characters: t

Major mode: Emacs-Lisp

Minor modes in effect:
  eldoc-mode: t
  erc-autojoin-mode: t
  erc-button-mode: t
  erc-ring-mode: t
  erc-pcomplete-mode: t
  erc-track-mode: t
  erc-fill-mode: t
  erc-stamp-mode: t
  erc-netsplit-mode: t
  desktop-save-mode: t
  mouse-wheel-mode: t
  display-time-mode: t
  auto-compression-mode: t
  iswitchb-mode: t
  recentf-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  line-number-mode: t

Recent input:
d C-n C-a ESC f ESC DEL I f SPC y o u SPC ESC DEL ESC 
DEL O h SPC n o ! SPC SPC Y o u SPC s h o u l d n ' 
t SPC b e SPC s e e i n g SPC m e . C-x C-s C-a C-p 
C-@ C-n C-n C-w C-p C-p C-p ESC C-d ESC f C-f C-f C-y 
C-o C-n C-n C-n C-x C-o C-x C-s ESC x r e p l DEL o 
r t - e m a c s - b u g RET

Recent messages:
Mark set [4 times]
Replaced 4 occurrences
Auto-saving...
Wrote /tmp/bug.el
Quit [2 times]
Mark saved where search started
Wrote /tmp/bug.el
Mark set [2 times]
Wrote /tmp/bug.el
Loading emacsbug...done

-- 
In the practice of computing, where we have so much latitude for
making a mess of it, mathematical elegance is not a dispensable
luxury, but a matter of life and death.

        -- Edsger W. Dijkstra: My Hopes of Computing Science (EWD  709)
        http://www.cs.utexas.edu/users/EWD/ewd07xx/EWD709.PDF