Re: Missing arglist for char-after

[Nick Roberts <nickrob@snap.net.nz>]

[2nd attempt]

[please cc the mailing list, other people might have better ideas]

 >     Well in mine
 > 
 > 	/pkg/gnu/share/emacs/22.1/etc/DOC-22.1.1
 > 
 > it looks a little different.  I am not certain how to read it so I have
 > included a bit of context.

Mine looks the same.  I just left out the control characters (because I wasn't
sure what mail would do to them).

 >     (fn)\x1fFeolp
 >     Return t if point is at the end of a line.
 >     `End of a line' includes point being at the end of the buffer.
 > 
 >     (fn)\x1fFchar-after
 >     Return character in current buffer at position POS.
 >     POS is an integer or a marker and defaults to point.
 >     If POS is out of range, the value is nil.
 > 
 >     (fn &optional POS)\x1fFchar-before
 >     Return character in current buffer preceding position POS.
 >     POS is an integer or a marker and defaults to point.
 >     If POS is out of range, the value is nil.
 > 
 > The context makes it look as though char-after is screwed up but char-before
 > is ok.  However, asking for a description of the function char-before
 > produces the same result

No this is alright.  The arglist comes _after_ the documentation, so
the (fn &optional POS) you see is for Fchar-after and the one for Fchar-before
(not shown) is attached to Fuser-login-name.

I'm afrraid I don't know why it doesn't work for you.  You need to use Edebug
on describe-function-1:

1) Do `C-u ESC C-x' inside describe-function-1.
2) C-h f <RET> char-after <RET>
3) The function describe-function-1 should appear in a buffer.  Move to the 
   beggining of the line:

     (let* ((arglist (help-function-arglist def))

   and press h.

4) Step through describe-function-1 (press SPC).
5) See what value the variable `usage' has.
   I suspect that it is nil but it should be:

("(char-after &optional POS)" . "Return character in current buffer at position POS.\nPOS is an integer or a marker and defaults to point.\nIf POS is out of range, the value is nil.")

This value comes from the DOC file through help-split-fundoc and documentation.

-- 
Nick                                           http://www.inet.net.nz/~nickrob