# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 758335777 0
# Node ID 2c5f3537a1ccc39ace2bcb676c9b2bb6fddedc1e
# Parent  b9e2884ca8e6d2752a88ad2e5a482af3d42c57fa
(syms_of_buffer): Don't do (put 'erase-buffer 'disabled t) here.
(keys_of_buffer): Do it here instead.

diff -r b9e2884ca8e6 -r 2c5f3537a1cc src/buffer.c
--- 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);
 }