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.

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

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.  */