diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/keyboard.c | 40 |
1 files changed, 19 insertions, 21 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index 105131eedb8..62ca6789244 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -6303,7 +6303,7 @@ menu_bar_items (old) | |||
| 6303 | { | 6303 | { |
| 6304 | /* No, so use major and minor mode keymaps and keymap property. */ | 6304 | /* No, so use major and minor mode keymaps and keymap property. */ |
| 6305 | int extra_maps = 2; | 6305 | int extra_maps = 2; |
| 6306 | Lisp_Object map = get_local_map (PT, current_buffer, keymap); | 6306 | Lisp_Object map = get_local_map (PT, current_buffer, Qkeymap); |
| 6307 | if (!NILP (map)) | 6307 | if (!NILP (map)) |
| 6308 | extra_maps = 3; | 6308 | extra_maps = 3; |
| 6309 | nmaps = current_minor_maps (NULL, &tmaps); | 6309 | nmaps = current_minor_maps (NULL, &tmaps); |
| @@ -6312,7 +6312,7 @@ menu_bar_items (old) | |||
| 6312 | bcopy (tmaps, maps, nmaps * sizeof (maps[0])); | 6312 | bcopy (tmaps, maps, nmaps * sizeof (maps[0])); |
| 6313 | if (!NILP (map)) | 6313 | if (!NILP (map)) |
| 6314 | maps[nmaps++] = map; | 6314 | maps[nmaps++] = map; |
| 6315 | maps[nmaps++] = get_local_map (PT, current_buffer, local_map); | 6315 | maps[nmaps++] = get_local_map (PT, current_buffer, Qlocal_map); |
| 6316 | } | 6316 | } |
| 6317 | maps[nmaps++] = current_global_map; | 6317 | maps[nmaps++] = current_global_map; |
| 6318 | } | 6318 | } |
| @@ -6955,7 +6955,7 @@ tool_bar_items (reuse, nitems) | |||
| 6955 | { | 6955 | { |
| 6956 | /* No, so use major and minor mode keymaps and keymap property. */ | 6956 | /* No, so use major and minor mode keymaps and keymap property. */ |
| 6957 | int extra_maps = 2; | 6957 | int extra_maps = 2; |
| 6958 | Lisp_Object map = get_local_map (PT, current_buffer, keymap); | 6958 | Lisp_Object map = get_local_map (PT, current_buffer, Qkeymap); |
| 6959 | if (!NILP (map)) | 6959 | if (!NILP (map)) |
| 6960 | extra_maps = 3; | 6960 | extra_maps = 3; |
| 6961 | nmaps = current_minor_maps (NULL, &tmaps); | 6961 | nmaps = current_minor_maps (NULL, &tmaps); |
| @@ -6964,7 +6964,7 @@ tool_bar_items (reuse, nitems) | |||
| 6964 | bcopy (tmaps, maps, nmaps * sizeof (maps[0])); | 6964 | bcopy (tmaps, maps, nmaps * sizeof (maps[0])); |
| 6965 | if (!NILP (map)) | 6965 | if (!NILP (map)) |
| 6966 | maps[nmaps++] = map; | 6966 | maps[nmaps++] = map; |
| 6967 | maps[nmaps++] = get_local_map (PT, current_buffer, local_map); | 6967 | maps[nmaps++] = get_local_map (PT, current_buffer, Qlocal_map); |
| 6968 | } | 6968 | } |
| 6969 | 6969 | ||
| 6970 | /* Add global keymap at the end. */ | 6970 | /* Add global keymap at the end. */ |
| @@ -7884,8 +7884,8 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 7884 | &junk); | 7884 | &junk); |
| 7885 | #endif /* GOBBLE_FIRST_EVENT */ | 7885 | #endif /* GOBBLE_FIRST_EVENT */ |
| 7886 | 7886 | ||
| 7887 | orig_local_map = get_local_map (PT, current_buffer, local_map); | 7887 | orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); |
| 7888 | orig_keymap = get_local_map (PT, current_buffer, keymap); | 7888 | orig_keymap = get_local_map (PT, current_buffer, Qkeymap); |
| 7889 | 7889 | ||
| 7890 | /* We jump here when the key sequence has been thoroughly changed, and | 7890 | /* We jump here when the key sequence has been thoroughly changed, and |
| 7891 | we need to rescan it starting from the beginning. When we jump here, | 7891 | we need to rescan it starting from the beginning. When we jump here, |
| @@ -8054,8 +8054,8 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 8054 | interrupted_kboard->kbd_queue); | 8054 | interrupted_kboard->kbd_queue); |
| 8055 | } | 8055 | } |
| 8056 | mock_input = 0; | 8056 | mock_input = 0; |
| 8057 | orig_local_map = get_local_map (PT, current_buffer, local_map); | 8057 | orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); |
| 8058 | orig_keymap = get_local_map (PT, current_buffer, keymap); | 8058 | orig_keymap = get_local_map (PT, current_buffer, Qkeymap); |
| 8059 | goto replay_sequence; | 8059 | goto replay_sequence; |
| 8060 | } | 8060 | } |
| 8061 | #endif | 8061 | #endif |
| @@ -8101,8 +8101,8 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 8101 | Fset_buffer (XWINDOW (selected_window)->buffer); | 8101 | Fset_buffer (XWINDOW (selected_window)->buffer); |
| 8102 | } | 8102 | } |
| 8103 | 8103 | ||
| 8104 | orig_local_map = get_local_map (PT, current_buffer, local_map); | 8104 | orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); |
| 8105 | orig_keymap = get_local_map (PT, current_buffer, keymap); | 8105 | orig_keymap = get_local_map (PT, current_buffer, Qkeymap); |
| 8106 | goto replay_sequence; | 8106 | goto replay_sequence; |
| 8107 | } | 8107 | } |
| 8108 | 8108 | ||
| @@ -8116,8 +8116,8 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 8116 | keybuf[t++] = key; | 8116 | keybuf[t++] = key; |
| 8117 | mock_input = t; | 8117 | mock_input = t; |
| 8118 | Vquit_flag = Qnil; | 8118 | Vquit_flag = Qnil; |
| 8119 | orig_local_map = get_local_map (PT, current_buffer, local_map); | 8119 | orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); |
| 8120 | orig_keymap = get_local_map (PT, current_buffer, keymap); | 8120 | orig_keymap = get_local_map (PT, current_buffer, Qkeymap); |
| 8121 | goto replay_sequence; | 8121 | goto replay_sequence; |
| 8122 | } | 8122 | } |
| 8123 | 8123 | ||
| @@ -8202,12 +8202,10 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 8202 | 8202 | ||
| 8203 | if (! FRAME_LIVE_P (XFRAME (selected_frame))) | 8203 | if (! FRAME_LIVE_P (XFRAME (selected_frame))) |
| 8204 | Fkill_emacs (Qnil); | 8204 | Fkill_emacs (Qnil); |
| 8205 | set_buffer_internal (XBUFFER (XWINDOW | 8205 | set_buffer_internal (XBUFFER (XWINDOW (window)->buffer)); |
| 8206 | (window)->buffer) | ||
| 8207 | ); | ||
| 8208 | orig_local_map = get_local_map (PT, current_buffer, | 8206 | orig_local_map = get_local_map (PT, current_buffer, |
| 8209 | local_map); | 8207 | Qlocal_map); |
| 8210 | orig_keymap = get_local_map (PT, current_buffer, keymap); | 8208 | orig_keymap = get_local_map (PT, current_buffer, Qkeymap); |
| 8211 | goto replay_sequence; | 8209 | goto replay_sequence; |
| 8212 | } | 8210 | } |
| 8213 | 8211 | ||
| @@ -8229,7 +8227,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 8229 | && XINT (pos) >= BEG && XINT (pos) <= Z) | 8227 | && XINT (pos) >= BEG && XINT (pos) <= Z) |
| 8230 | { | 8228 | { |
| 8231 | map_here = get_local_map (XINT (pos), | 8229 | map_here = get_local_map (XINT (pos), |
| 8232 | current_buffer, local_map); | 8230 | current_buffer, Qlocal_map); |
| 8233 | if (!EQ (map_here, orig_local_map)) | 8231 | if (!EQ (map_here, orig_local_map)) |
| 8234 | { | 8232 | { |
| 8235 | orig_local_map = map_here; | 8233 | orig_local_map = map_here; |
| @@ -8239,7 +8237,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last, | |||
| 8239 | goto replay_sequence; | 8237 | goto replay_sequence; |
| 8240 | } | 8238 | } |
| 8241 | map_here = get_local_map (XINT (pos), | 8239 | map_here = get_local_map (XINT (pos), |
| 8242 | current_buffer, keymap); | 8240 | current_buffer, Qkeymap); |
| 8243 | if (!EQ (map_here, orig_keymap)) | 8241 | if (!EQ (map_here, orig_keymap)) |
| 8244 | { | 8242 | { |
| 8245 | orig_keymap = map_here; | 8243 | orig_keymap = map_here; |
| @@ -9249,7 +9247,7 @@ current_active_maps (maps_p) | |||
| 9249 | { | 9247 | { |
| 9250 | /* No, so use major and minor mode keymaps and keymap property. */ | 9248 | /* No, so use major and minor mode keymaps and keymap property. */ |
| 9251 | int extra_maps = 2; | 9249 | int extra_maps = 2; |
| 9252 | Lisp_Object map = get_local_map (PT, current_buffer, keymap); | 9250 | Lisp_Object map = get_local_map (PT, current_buffer, Qkeymap); |
| 9253 | if (!NILP (map)) | 9251 | if (!NILP (map)) |
| 9254 | extra_maps = 3; | 9252 | extra_maps = 3; |
| 9255 | nmaps = current_minor_maps (NULL, &tmaps); | 9253 | nmaps = current_minor_maps (NULL, &tmaps); |
| @@ -9258,7 +9256,7 @@ current_active_maps (maps_p) | |||
| 9258 | bcopy (tmaps, maps, nmaps * sizeof (maps[0])); | 9256 | bcopy (tmaps, maps, nmaps * sizeof (maps[0])); |
| 9259 | if (!NILP (map)) | 9257 | if (!NILP (map)) |
| 9260 | maps[nmaps++] = map; | 9258 | maps[nmaps++] = map; |
| 9261 | maps[nmaps++] = get_local_map (PT, current_buffer, local_map); | 9259 | maps[nmaps++] = get_local_map (PT, current_buffer, Qlocal_map); |
| 9262 | } | 9260 | } |
| 9263 | maps[nmaps++] = current_global_map; | 9261 | maps[nmaps++] = current_global_map; |
| 9264 | 9262 | ||