Mercurial > emacs
changeset 2060:7eea4dfc5133
(syms_of_buffer): Make erase-buffer a disabled command.
author | Roland McGrath <roland@gnu.org> |
---|---|
date | Sun, 07 Mar 1993 23:41:34 +0000 |
parents | 3eaba0d9797c |
children | 8fe7e77dc596 |
files | src/buffer.c |
diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/buffer.c Sun Mar 07 23:32:54 1993 +0000 +++ b/src/buffer.c Sun Mar 07 23:41:34 1993 +0000 @@ -1402,6 +1402,8 @@ /* initialize the buffer routines */ syms_of_buffer () { + extern Lisp_Object Qdisabled; + staticpro (&Vbuffer_defaults); staticpro (&Vbuffer_local_symbols); staticpro (&Qfundamental_mode); @@ -1417,6 +1419,8 @@ 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. */