Mercurial > emacs
comparison src/keymap.c @ 85106:fd282fb888de
Add new `input-decode-map' keymap and use it for temrinal
escape sequences.
* keyboard.h (struct kboard): Add Vinput_decode_map.
Remove Vlocal_key_translation_map.
* keyboard.c (read_key_sequence): Add support for input-decode-map.
(init_kboard): Init input-decode-map.
Replace local-key-translation-map back with key-translation-map.
(syms_of_keyboard): Declare input-decode-map.
Remove local-key-translation-map. Update docstrings.
(mark_kboards): Mark Vinput_decode_map.
Don't mark Vlocal_key_translation_map.
* keymap.c (Fdescribe_buffer_bindings): Describe input-decode-map.
Replace local-key-translation-map back with key-translation-map.
* term.c (term_get_fkeys_1, CONDITIONAL_REASSIGN):
Bind in input-decode-map rather than function-key-map.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Tue, 09 Oct 2007 05:05:39 +0000 |
parents | 5b644ae74c91 |
children | f7d19cfed7da bdb3fe0ba9fa |
comparison
equal
deleted
inserted
replaced
85105:ba4f1a829f83 | 85106:fd282fb888de |
---|---|
3025 } | 3025 } |
3026 | 3026 |
3027 insert ("\n", 1); | 3027 insert ("\n", 1); |
3028 } | 3028 } |
3029 | 3029 |
3030 if (!NILP (current_kboard->Vlocal_key_translation_map)) | 3030 if (!NILP (Vkey_translation_map)) |
3031 describe_map_tree (current_kboard->Vlocal_key_translation_map, 0, Qnil, prefix, | 3031 describe_map_tree (Vkey_translation_map, 0, Qnil, prefix, |
3032 "Key translations", nomenu, 1, 0, 0); | 3032 "Key translations", nomenu, 1, 0, 0); |
3033 | 3033 |
3034 | 3034 |
3035 /* Print the (major mode) local map. */ | 3035 /* Print the (major mode) local map. */ |
3036 start1 = Qnil; | 3036 start1 = Qnil; |
3118 | 3118 |
3119 /* Print the function-key-map translations under this prefix. */ | 3119 /* Print the function-key-map translations under this prefix. */ |
3120 if (!NILP (current_kboard->Vlocal_function_key_map)) | 3120 if (!NILP (current_kboard->Vlocal_function_key_map)) |
3121 describe_map_tree (current_kboard->Vlocal_function_key_map, 0, Qnil, prefix, | 3121 describe_map_tree (current_kboard->Vlocal_function_key_map, 0, Qnil, prefix, |
3122 "\f\nFunction key map translations", nomenu, 1, 0, 0); | 3122 "\f\nFunction key map translations", nomenu, 1, 0, 0); |
3123 | |
3124 /* Print the input-decode-map translations under this prefix. */ | |
3125 if (!NILP (current_kboard->Vinput_decode_map)) | |
3126 describe_map_tree (current_kboard->Vinput_decode_map, 0, Qnil, prefix, | |
3127 "\f\nInput decoding map translations", nomenu, 1, 0, 0); | |
3123 | 3128 |
3124 UNGCPRO; | 3129 UNGCPRO; |
3125 return Qnil; | 3130 return Qnil; |
3126 } | 3131 } |
3127 | 3132 |