diff options
| author | Gerd Moellmann | 2001-08-22 08:29:20 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2001-08-22 08:29:20 +0000 |
| commit | 62b366ffb32702059a53aba680dd5efdd6bdfb64 (patch) | |
| tree | fb089d1493df7b92377f329b91983f543b9bbeec /src | |
| parent | efeb796b01d8ff936fa06e21deaa1ac3b3ed515c (diff) | |
| download | emacs-62b366ffb32702059a53aba680dd5efdd6bdfb64.tar.gz emacs-62b366ffb32702059a53aba680dd5efdd6bdfb64.zip | |
(access_keymap): Fix last change to not consider
IDX when it has modifiers.
Diffstat (limited to 'src')
| -rw-r--r-- | src/keymap.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/keymap.c b/src/keymap.c index c4054f3a95a..e503172cfa4 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -537,7 +537,9 @@ access_keymap (map, idx, t_ok, noinherit, autoload) | |||
| 537 | return get_keyelt (val, autoload); | 537 | return get_keyelt (val, autoload); |
| 538 | } | 538 | } |
| 539 | else if (INTEGERP (idx) | 539 | else if (INTEGERP (idx) |
| 540 | && (XINT (idx) & CHAR_MODIFIER_MASK) == 0 | ||
| 540 | && INTEGERP (key) | 541 | && INTEGERP (key) |
| 542 | && (XINT (key) & CHAR_MODIFIER_MASK) == 0 | ||
| 541 | && !SINGLE_BYTE_CHAR_P (XINT (idx)) | 543 | && !SINGLE_BYTE_CHAR_P (XINT (idx)) |
| 542 | && !SINGLE_BYTE_CHAR_P (XINT (key)) | 544 | && !SINGLE_BYTE_CHAR_P (XINT (key)) |
| 543 | && CHAR_VALID_P (XINT (key), 1) | 545 | && CHAR_VALID_P (XINT (key), 1) |
| @@ -571,9 +573,7 @@ access_keymap (map, idx, t_ok, noinherit, autoload) | |||
| 571 | are not included in a char-table. | 573 | are not included in a char-table. |
| 572 | All character codes without modifiers are included. */ | 574 | All character codes without modifiers are included. */ |
| 573 | if (NATNUMP (idx) | 575 | if (NATNUMP (idx) |
| 574 | && ! (XFASTINT (idx) | 576 | && (XFASTINT (idx) & CHAR_MODIFIER_MASK) == 0) |
| 575 | & (CHAR_ALT | CHAR_SUPER | CHAR_HYPER | ||
| 576 | | CHAR_SHIFT | CHAR_CTL | CHAR_META))) | ||
| 577 | { | 577 | { |
| 578 | val = Faref (binding, idx); | 578 | val = Faref (binding, idx); |
| 579 | if (noprefix && KEYMAPP (val)) | 579 | if (noprefix && KEYMAPP (val)) |