# HG changeset patch # User Gerd Moellmann # Date 979298273 0 # Node ID d473294a0124353509dc99c94f4dca43a87caaa7 # Parent 54d36c772e7b60162aedd9dfa39a7ffcad0a6224 Call get_local_map with new argument list. diff -r 54d36c772e7b -r d473294a0124 src/keyboard.c --- a/src/keyboard.c Fri Jan 12 06:33:21 2001 +0000 +++ b/src/keyboard.c Fri Jan 12 11:17:53 2001 +0000 @@ -6303,7 +6303,7 @@ { /* No, so use major and minor mode keymaps and keymap property. */ int extra_maps = 2; - Lisp_Object map = get_local_map (PT, current_buffer, keymap); + Lisp_Object map = get_local_map (PT, current_buffer, Qkeymap); if (!NILP (map)) extra_maps = 3; nmaps = current_minor_maps (NULL, &tmaps); @@ -6312,7 +6312,7 @@ bcopy (tmaps, maps, nmaps * sizeof (maps[0])); if (!NILP (map)) maps[nmaps++] = map; - maps[nmaps++] = get_local_map (PT, current_buffer, local_map); + maps[nmaps++] = get_local_map (PT, current_buffer, Qlocal_map); } maps[nmaps++] = current_global_map; } @@ -6955,7 +6955,7 @@ { /* No, so use major and minor mode keymaps and keymap property. */ int extra_maps = 2; - Lisp_Object map = get_local_map (PT, current_buffer, keymap); + Lisp_Object map = get_local_map (PT, current_buffer, Qkeymap); if (!NILP (map)) extra_maps = 3; nmaps = current_minor_maps (NULL, &tmaps); @@ -6964,7 +6964,7 @@ bcopy (tmaps, maps, nmaps * sizeof (maps[0])); if (!NILP (map)) maps[nmaps++] = map; - maps[nmaps++] = get_local_map (PT, current_buffer, local_map); + maps[nmaps++] = get_local_map (PT, current_buffer, Qlocal_map); } /* Add global keymap at the end. */ @@ -7884,8 +7884,8 @@ &junk); #endif /* GOBBLE_FIRST_EVENT */ - orig_local_map = get_local_map (PT, current_buffer, local_map); - orig_keymap = get_local_map (PT, current_buffer, keymap); + orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); + orig_keymap = get_local_map (PT, current_buffer, Qkeymap); /* We jump here when the key sequence has been thoroughly changed, and we need to rescan it starting from the beginning. When we jump here, @@ -8054,8 +8054,8 @@ interrupted_kboard->kbd_queue); } mock_input = 0; - orig_local_map = get_local_map (PT, current_buffer, local_map); - orig_keymap = get_local_map (PT, current_buffer, keymap); + orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); + orig_keymap = get_local_map (PT, current_buffer, Qkeymap); goto replay_sequence; } #endif @@ -8101,8 +8101,8 @@ Fset_buffer (XWINDOW (selected_window)->buffer); } - orig_local_map = get_local_map (PT, current_buffer, local_map); - orig_keymap = get_local_map (PT, current_buffer, keymap); + orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); + orig_keymap = get_local_map (PT, current_buffer, Qkeymap); goto replay_sequence; } @@ -8116,8 +8116,8 @@ keybuf[t++] = key; mock_input = t; Vquit_flag = Qnil; - orig_local_map = get_local_map (PT, current_buffer, local_map); - orig_keymap = get_local_map (PT, current_buffer, keymap); + orig_local_map = get_local_map (PT, current_buffer, Qlocal_map); + orig_keymap = get_local_map (PT, current_buffer, Qkeymap); goto replay_sequence; } @@ -8202,12 +8202,10 @@ if (! FRAME_LIVE_P (XFRAME (selected_frame))) Fkill_emacs (Qnil); - set_buffer_internal (XBUFFER (XWINDOW - (window)->buffer) -); + set_buffer_internal (XBUFFER (XWINDOW (window)->buffer)); orig_local_map = get_local_map (PT, current_buffer, - local_map); - orig_keymap = get_local_map (PT, current_buffer, keymap); + Qlocal_map); + orig_keymap = get_local_map (PT, current_buffer, Qkeymap); goto replay_sequence; } @@ -8229,7 +8227,7 @@ && XINT (pos) >= BEG && XINT (pos) <= Z) { map_here = get_local_map (XINT (pos), - current_buffer, local_map); + current_buffer, Qlocal_map); if (!EQ (map_here, orig_local_map)) { orig_local_map = map_here; @@ -8239,7 +8237,7 @@ goto replay_sequence; } map_here = get_local_map (XINT (pos), - current_buffer, keymap); + current_buffer, Qkeymap); if (!EQ (map_here, orig_keymap)) { orig_keymap = map_here; @@ -9249,7 +9247,7 @@ { /* No, so use major and minor mode keymaps and keymap property. */ int extra_maps = 2; - Lisp_Object map = get_local_map (PT, current_buffer, keymap); + Lisp_Object map = get_local_map (PT, current_buffer, Qkeymap); if (!NILP (map)) extra_maps = 3; nmaps = current_minor_maps (NULL, &tmaps); @@ -9258,7 +9256,7 @@ bcopy (tmaps, maps, nmaps * sizeof (maps[0])); if (!NILP (map)) maps[nmaps++] = map; - maps[nmaps++] = get_local_map (PT, current_buffer, local_map); + maps[nmaps++] = get_local_map (PT, current_buffer, Qlocal_map); } maps[nmaps++] = current_global_map;