aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann2001-01-12 11:17:53 +0000
committerGerd Moellmann2001-01-12 11:17:53 +0000
commit24a40fbb28b6873892208e55954527e72fb8b95e (patch)
treeb3268b168fdd59c1aadbb278913a410a5763fc80
parent5beaa0d168d9de2df20b837b76e414e2d25da0fc (diff)
downloademacs-24a40fbb28b6873892208e55954527e72fb8b95e.tar.gz
emacs-24a40fbb28b6873892208e55954527e72fb8b95e.zip
Call get_local_map with new argument list.
-rw-r--r--src/keyboard.c40
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