comparison src/buffer.c @ 90796:4ef881a120fe

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 675-697) - Update from CVS - Merge from gnus--rel--5.10 - Release ERC 5.2. * gnus--rel--5.10 (patch 211-215) - Update from CVS - Merge from emacs--devo--0 Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-189
author Miles Bader <miles@gnu.org>
date Wed, 11 Apr 2007 00:17:47 +0000
parents c0409ee15cee 6ef15c3befe4
children e6fdae9180d4
comparison
equal deleted inserted replaced
90795:b9182b6a90c9 90796:4ef881a120fe
1612 (buffer) 1612 (buffer)
1613 Lisp_Object buffer; 1613 Lisp_Object buffer;
1614 { 1614 {
1615 int count; 1615 int count;
1616 Lisp_Object function; 1616 Lisp_Object function;
1617
1618 CHECK_BUFFER (buffer);
1617 1619
1618 if (STRINGP (XBUFFER (buffer)->name) 1620 if (STRINGP (XBUFFER (buffer)->name)
1619 && strcmp (SDATA (XBUFFER (buffer)->name), "*scratch*") == 0) 1621 && strcmp (SDATA (XBUFFER (buffer)->name), "*scratch*") == 0)
1620 function = find_symbol_value (intern ("initial-major-mode")); 1622 function = find_symbol_value (intern ("initial-major-mode"));
1621 else 1623 else