Mercurial > hg > xemacs-beta

comparison src/buffer.c @ 251:677f6a0ee643 r20-5b24

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b24
author cvs
date Mon, 13 Aug 2007 10:19:59 +0200
parents 41f2f0e326e9
children 11cf20601dec
comparison
equal deleted inserted replaced
250:f385a461c9aa 251:677f6a0ee643
1160 Any undo records it already has are discarded. 1160 Any undo records it already has are discarded.
1161 No argument or nil as argument means do this for the current buffer. 1161 No argument or nil as argument means do this for the current buffer.
1162 */ 1162 */
1163 (buffer)) 1163 (buffer))
1164 { 1164 {
1165 /* Allowing nil is an RMSism */ 1165 /* Allowing nil is an Emacs-ism */
1166 struct buffer *real_buf = decode_buffer (buffer, 1); 1166 struct buffer *real_buf = decode_buffer (buffer, 1);
1167 real_buf->undo_list = Qt; 1167 real_buf->undo_list = Qt;
1168 return Qnil; 1168 return Qnil;
1169 } 1169 }
1170 1170
1172 Start keeping undo information for buffer BUFFER. 1172 Start keeping undo information for buffer BUFFER.
1173 No argument or nil as argument means do this for the current buffer. 1173 No argument or nil as argument means do this for the current buffer.
1174 */ 1174 */
1175 (buffer)) 1175 (buffer))
1176 { 1176 {
1177 /* Allowing nil is an RMSism */ 1177 /* Allowing nil is an Emacs-ism */
1178 struct buffer *real_buf = decode_buffer (buffer, 1); 1178 struct buffer *real_buf = decode_buffer (buffer, 1);
1179 if (EQ (real_buf->undo_list, Qt)) 1179 if (EQ (real_buf->undo_list, Qt))
1180 real_buf->undo_list = Qnil; 1180 real_buf->undo_list = Qnil;
1181 1181
1182 return Qnil; 1182 return Qnil;