summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2002-03-04 23:20:06 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2002-03-04 23:20:06 +0000
commitc01d0677abc9f0f2645e90ed1e23619c008e90a2 (patch)
tree1f2995e78ff011dca38011f4fb87f3027784df86
parentb6b90dfc51453d0f9c2e594d6aa842c33df6b1ba (diff)
downloademacs-c01d0677abc9f0f2645e90ed1e23619c008e90a2.tar.gz
emacs-c01d0677abc9f0f2645e90ed1e23619c008e90a2.tar.bz2
emacs-c01d0677abc9f0f2645e90ed1e23619c008e90a2.zip
(syms_of_buffer): Allow non-string `mode-name'.
-rw-r--r--src/buffer.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/buffer.c b/src/buffer.c
index 8cd8de487c2..5bc8a9ae547 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -1553,7 +1553,7 @@ no_switch_window (window)
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 @@ nil here means use current buffer's major mode. */);
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,