diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-03-07 20:18:52 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-03-07 20:18:52 +0000 |
| commit | d3cc13faacbb55441b992ab0e0b14641b64182af (patch) | |
| tree | 61c0fdb0d1bf858d85484273b1af8607e105569d | |
| parent | e7cb0106ac8640b782c2925f41186b3f30ba0de1 (diff) | |
| download | emacs-d3cc13faacbb55441b992ab0e0b14641b64182af.tar.gz | |
(read_key_sequence):
Use meta_modifier for meta keys when handling function_key_map.
| -rw-r--r-- | src/keyboard.c | 4 |
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) key = keybuf[fkey_end++]; /* Look up meta-characters by prefixing them with meta_prefix_char. I hate this. */ - if (XTYPE (key) == Lisp_Int && XINT (key) & 0x80) + if (XTYPE (key) == Lisp_Int && XINT (key) & meta_modifier) { fkey_next = get_keymap_1 @@ -3506,7 +3506,7 @@ read_key_sequence (keybuf, bufsize, prompt) (access_keymap (fkey_map, meta_prefix_char, 1)), 0, 1); - XFASTINT (key) = XFASTINT (key) & 0x7f; + XFASTINT (key) = XFASTINT (key) & ~meta_modifier; } else fkey_next = fkey_map; |