Mercurial > emacs

changeset 43712:223f1f5d160d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(syms_of_buffer): Allow non-string `mode-name'.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 04 Mar 2002 23:20:06 +0000
parents d15360503e4e
children f92c4d87863a
files src/buffer.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/buffer.c	Mon Mar 04 23:00:28 2002 +0000
+++ b/src/buffer.c	Mon Mar 04 23:20:06 2002 +0000
@@ -1553,7 +1553,7 @@
   if (EQ (minibuf_window, window))
     return "Cannot switch buffers in minibuffer window";
   tem = Fwindow_dedicated_p (window);
-  if (!NILP (tem))
+  if (EQ (tem, Qt))
     return "Cannot switch buffers in a dedicated window";
   return NULL;
 }
@@ -5226,7 +5226,7 @@
 		     doc: /* Symbol for current buffer's major mode.  */);
 
   DEFVAR_PER_BUFFER ("mode-name", &current_buffer->mode_name,
-                     make_number (Lisp_String),
+                     Qnil,
 		     doc: /* Pretty name of current buffer's major mode (a string).  */);
 
   DEFVAR_PER_BUFFER ("abbrev-mode", &current_buffer->abbrev_mode, Qnil,