Mercurial > emacs

changeset 38901:f90da7c4551c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(access_keymap): Fix last change to not consider IDX when it has modifiers.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 22 Aug 2001 08:29:20 +0000
parents a3e94a8271e0
children 7c02e0051bda
files src/keymap.c
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- 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))