Mercurial > hg > xemacs-beta

comparison src/cmds.c @ 16:0293115a14e9 r19-15b91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents 4b173ad71786
children d95e72db5c07
comparison
equal deleted inserted replaced
15:ad457d5f7d04 16:0293115a14e9
209 If BUFFER is nil, the current buffer is assumed. 209 If BUFFER is nil, the current buffer is assumed.
210 */ ) 210 */ )
211 (arg, buffer) 211 (arg, buffer)
212 Lisp_Object arg, buffer; 212 Lisp_Object arg, buffer;
213 { 213 {
214 struct buffer *buf = decode_buffer (buffer, 1); 214 struct buffer *b = decode_buffer (buffer, 1);
215 215
216 BUF_SET_PT(buf, XINT (Fpoint_at_eol (arg, buffer))); 216 BUF_SET_PT(b, XINT (Fpoint_at_eol (arg, buffer)));
217 return Qnil; 217 return Qnil;
218 } 218 }
219 219
220 DEFUN ("delete-char", Fdelete_char, Sdelete_char, 1, 2, "*p\nP" /* 220 DEFUN ("delete-char", Fdelete_char, Sdelete_char, 1, 2, "*p\nP" /*
221 Delete the following ARG characters (previous, with negative arg). 221 Delete the following ARG characters (previous, with negative arg).