aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/keyboard.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index a1a0fc536fd..6c664169f03 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -3498,7 +3498,7 @@ read_key_sequence (keybuf, bufsize, prompt)
3498 key = keybuf[fkey_end++]; 3498 key = keybuf[fkey_end++];
3499 /* Look up meta-characters by prefixing them 3499 /* Look up meta-characters by prefixing them
3500 with meta_prefix_char. I hate this. */ 3500 with meta_prefix_char. I hate this. */
3501 if (XTYPE (key) == Lisp_Int && XINT (key) & 0x80) 3501 if (XTYPE (key) == Lisp_Int && XINT (key) & meta_modifier)
3502 { 3502 {
3503 fkey_next = 3503 fkey_next =
3504 get_keymap_1 3504 get_keymap_1
@@ -3506,7 +3506,7 @@ read_key_sequence (keybuf, bufsize, prompt)
3506 (access_keymap 3506 (access_keymap
3507 (fkey_map, meta_prefix_char, 1)), 3507 (fkey_map, meta_prefix_char, 1)),
3508 0, 1); 3508 0, 1);
3509 XFASTINT (key) = XFASTINT (key) & 0x7f; 3509 XFASTINT (key) = XFASTINT (key) & ~meta_modifier;
3510 } 3510 }
3511 else 3511 else
3512 fkey_next = fkey_map; 3512 fkey_next = fkey_map;