Mercurial > emacs

comparison src/buffer.c @ 76791:6ef15c3befe4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fset_buffer_major_mode): Check that BUFFER is valid.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 29 Mar 2007 15:58:34 +0000
parents b99f6ff8775b
children 421b3f5480da 4ef881a120fe
comparison
equal deleted inserted replaced
76790:b7f5870e3ec1 76791:6ef15c3befe4
1611 (buffer) 1611 (buffer)
1612 Lisp_Object buffer; 1612 Lisp_Object buffer;
1613 { 1613 {
1614 int count; 1614 int count;
1615 Lisp_Object function; 1615 Lisp_Object function;
1616
1617 CHECK_BUFFER (buffer);
1616 1618
1617 if (STRINGP (XBUFFER (buffer)->name) 1619 if (STRINGP (XBUFFER (buffer)->name)
1618 && strcmp (SDATA (XBUFFER (buffer)->name), "*scratch*") == 0) 1620 && strcmp (SDATA (XBUFFER (buffer)->name), "*scratch*") == 0)
1619 function = find_symbol_value (intern ("initial-major-mode")); 1621 function = find_symbol_value (intern ("initial-major-mode"));
1620 else 1622 else