Fix previous change; also correct its change log:

(Fdefine_key): Add error message for trying to bind [DEL], [RET], etc.
(exclude_keys): New variable.
(Flookup_key): Error message if key has wrong data type.

2 files changed, 5 insertions, 4 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 16ffe8b6b7c..1f4a09c32b9 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -2,7 +2,8 @@
 
         * keymap.c (Flookup_key): Error message if key has wrong data type.
         (Fdefine_key): Add error message for trying to bind [DEL], [RET], etc.
-
+        (exclude_key): New variable.
+        
 2001-12-28  Gerd Moellmann  <gerd@gnu.org>
 
         * xterm.c (x_setup_relief_colors): Don't compute an image's
diff --git a/src/keymap.c b/src/keymap.c
index 38cafb916b7..ecc17e4a957 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -48,9 +48,6 @@ Lisp_Object meta_map;		/* The keymap used for globally bound
 Lisp_Object control_x_map;      /* The keymap used for globally bound
                                    C-x-prefixed default commands */
 
-/* Alist of elements like (DEL . "\d").  */
-Lisp_Object exclude_keys;
-
 /* was MinibufLocalMap */
 Lisp_Object Vminibuffer_local_map;
                                 /* The keymap used by the minibuf for local
@@ -94,6 +91,9 @@ Lisp_Object Vdefine_key_rebound_commands;
 
 Lisp_Object Qkeymapp, Qkeymap, Qnon_ascii, Qmenu_item;
 
+/* Alist of elements like (DEL . "\d").  */
+static Lisp_Object exclude_keys;
+
 /* A char with the CHAR_META bit set in a vector or the 0200 bit set
    in a string key sequence is equivalent to prefixing with this
    character.  */