# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 998468960 0
# Node ID f90da7c4551c78cb288d097e217dacc8f6ad8c60
# Parent  a3e94a8271e029a348129e96d0d72fbe3aca827c
(access_keymap): Fix last change to not consider
IDX when it has modifiers.

diff -r a3e94a8271e0 -r f90da7c4551c src/keymap.c
--- a/src/keymap.c	Wed Aug 22 07:11:33 2001 +0000
+++ b/src/keymap.c	Wed Aug 22 08:29:20 2001 +0000
@@ -537,7 +537,9 @@
 		return get_keyelt (val, autoload);
 	      }
 	    else if (INTEGERP (idx)
+		     && (XINT (idx) & CHAR_MODIFIER_MASK) == 0
 		     && INTEGERP (key)
+		     && (XINT (key) & CHAR_MODIFIER_MASK) == 0
 		     && !SINGLE_BYTE_CHAR_P (XINT (idx))
 		     && !SINGLE_BYTE_CHAR_P (XINT (key))
 		     && CHAR_VALID_P (XINT (key), 1)
@@ -571,9 +573,7 @@
 	       are not included in a char-table.
 	       All character codes without modifiers are included.  */
 	    if (NATNUMP (idx)
-		&& ! (XFASTINT (idx)
-		      & (CHAR_ALT | CHAR_SUPER | CHAR_HYPER
-			 | CHAR_SHIFT | CHAR_CTL | CHAR_META)))
+		&& (XFASTINT (idx) & CHAR_MODIFIER_MASK) == 0)
 	      {
 		val = Faref (binding, idx);
 		if (noprefix && KEYMAPP (val))