# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 718070739 0
# Node ID 884c3d7e7172b9674a26d69e6f92b02649987038
# Parent  4cbe6db1041e97775b83c05f1a517b28b79b7413
	* keymap.c (access_keymap, store_in_keymap,
	Fsingle_key_description): No need to check for
	EVENT_HAS_PARAMETERS before using EVENT_HEAD; the latter now
	works properly on all sorts of events.

diff -r 4cbe6db1041e -r 884c3d7e7172 src/keymap.c
--- a/src/keymap.c	Sat Oct 03 00:04:59 1992 +0000
+++ b/src/keymap.c	Sat Oct 03 00:05:39 1992 +0000
@@ -215,8 +215,7 @@
   /* If idx is a list (some sort of mouse click, perhaps?),
      the index we want to use is the car of the list, which
      ought to be a symbol.  */
-  if (EVENT_HAS_PARAMETERS (idx))
-    idx = EVENT_HEAD (idx);
+  idx = EVENT_HEAD (idx);
 
   if (XTYPE (idx) == Lisp_Int
       && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE))
@@ -312,8 +311,7 @@
   /* If idx is a list (some sort of mouse click, perhaps?),
      the index we want to use is the car of the list, which
      ought to be a symbol.  */
-  if (EVENT_HAS_PARAMETERS (idx))
-    idx = EVENT_HEAD (idx);
+  idx = EVENT_HEAD (idx);
 
   if (XTYPE (idx) == Lisp_Int
       && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE))
@@ -1105,8 +1103,7 @@
   register unsigned char c;
   char tem[6];
 
-  if (EVENT_HAS_PARAMETERS (key))
-    key = EVENT_HEAD (key);
+  key = EVENT_HEAD (key);
 
   switch (XTYPE (key))
     {