Re: end-of-defun is fubsr.

[Alan Mackenzie]

Hi, Stefan,

On Fri, Feb 13, 2009 at 12:06:26PM -0500, Stefan Monnier wrote:
> >> Did you notice any other problem?
> > Well, the ones I pointed out before:

> Great, thanks,

Sorry, here's something a bit more constructive:

#########################################################################
*** lisp.el~    2009-02-12 12:10:53.000000000 +0000
--- lisp.el     2009-02-13 18:49:26.780916880 +0000
***************
*** 314,322 ****
  
  (defvar end-of-defun-function #'forward-sexp
    "Function for `end-of-defun' to call.
! This is used to find the end of the defun.
! It is called with no argument, right after calling `beginning-of-defun-raw'.
! So the function can assume that point is at the beginning of the defun body.")
  
  (defun buffer-end (arg)
    "Return the \"far end\" position of the buffer, in direction ARG.
--- 314,326 ----
  
  (defvar end-of-defun-function #'forward-sexp
    "Function for `end-of-defun' to call.
! This should move point to the next end of defun and return t on success,
! nil on failure.  It should not move further forward into any whitespace or
! onto the next line.
! 
! It is called with no argument.
! The function can assume that point is at the beginning of a defun
! body or before the first defun in the buffer.")
  
  (defun buffer-end (arg)
    "Return the \"far end\" position of the buffer, in direction ARG.
#########################################################################

Another thing: in an elisp buffer, if (point-min) is in the middle of a
defun, C-M-e takes point to the next but one EOD.  CC Mode is just as
bad.  ;-)

Should end-of-defun perhaps widen the buffer around its machinations?

>         Stefan

-- 
Alan Mackenzie (Nuremberg, Germany).