Mercurial > emacs
changeset 5570:2c5f3537a1cc
(syms_of_buffer): Don't do (put 'erase-buffer 'disabled t) here.
(keys_of_buffer): Do it here instead.
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Wed, 12 Jan 1994 00:49:37 +0000 |
| parents | b9e2884ca8e6 |
| children | c50d6d8ad8c1 |
| files | src/buffer.c |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/buffer.c Tue Jan 11 22:08:49 1994 +0000 +++ b/src/buffer.c Wed Jan 12 00:49:37 1994 +0000 @@ -1,5 +1,5 @@ /* Buffer manipulation primitives for GNU Emacs. - Copyright (C) 1985, 1986, 1987, 1988, 1989, 1993 + Copyright (C) 1985, 1986, 1987, 1988, 1989, 1993, 1994 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -2204,8 +2204,6 @@ Fput (Qprotected_field, Qerror_message, build_string ("Attempt to modify a protected field")); - Fput (intern ("erase-buffer"), Qdisabled, Qt); - /* All these use DEFVAR_LISP_NOPRO because the slots in buffer_defaults will all be marked via Vbuffer_defaults. */ @@ -2575,4 +2573,8 @@ initial_define_key (control_x_map, 'b', "switch-to-buffer"); initial_define_key (control_x_map, 'k', "kill-buffer"); initial_define_key (control_x_map, Ctl ('B'), "list-buffers"); + + /* This must not be in syms_of_buffer, because Qdisabled is not + initialized when that function gets called. */ + Fput (intern ("erase-buffer"), Qdisabled, Qt); }