diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-03-04 23:20:06 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-03-04 23:20:06 +0000 |
commit | c01d0677abc9f0f2645e90ed1e23619c008e90a2 (patch) | |
tree | 1f2995e78ff011dca38011f4fb87f3027784df86 | |
parent | b6b90dfc51453d0f9c2e594d6aa842c33df6b1ba (diff) | |
download | emacs-c01d0677abc9f0f2645e90ed1e23619c008e90a2.tar.gz emacs-c01d0677abc9f0f2645e90ed1e23619c008e90a2.tar.bz2 emacs-c01d0677abc9f0f2645e90ed1e23619c008e90a2.zip |
(syms_of_buffer): Allow non-string `mode-name'.
-rw-r--r-- | src/buffer.c | 4 |
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", ¤t_buffer->mode_name, - make_number (Lisp_String), + Qnil, doc: /* Pretty name of current buffer's major mode (a string). */); DEFVAR_PER_BUFFER ("abbrev-mode", ¤t_buffer->abbrev_mode, Qnil, |