1 |
|
2002-02-06 Kim F. Storm <storm@cua.dk> |
2 |
|
|
3 |
|
* keymap.c (Fdefine_key): Allow symbol as KEY argument for |
4 |
|
defining command remapping. Doc updated. |
5 |
|
(Flookup_key): Remap command through keymap if KEY is a symbol. |
6 |
|
(is_command_symbol): New function. |
7 |
|
(Fkey_binding): Use it. New optional argument NO-REMAP. Doc |
8 |
|
updated. Callers changed. Perform command remapping via |
9 |
|
recursive call unless that arg is non-nil. |
10 |
|
(where_is_internal): New argument no_remap. Callers changed. |
11 |
|
Call recursively to find original key bindings for a remapped |
12 |
|
comand unless that arg is non-nil. |
13 |
|
(Fwhere_is_internal): New optional argument NO-REMAP. Doc |
14 |
|
updated. Callers changed. Pass arg to where_is_internal. |
15 |
|
|
16 |
|
* keymap.h (Fkey_binding, Fwhere_is_internal): Update prototype. |
17 |
|
(is_command_symbol): Added prototype. |
18 |
|
|
19 |
|
* keyboard.c (Vthis_original_command): New variable. |
20 |
|
(syms_of_keyboard): DEFVAR_LISP it. |
21 |
|
(command_loop_1): Set it, and perform command remapping. |
22 |
|
|
23 |
2002-02-06 Pavel Jan,Bm(Bk <Pavel@Janik.cz> |
2002-02-06 Pavel Jan,Bm(Bk <Pavel@Janik.cz> |
24 |
|
|
25 |
* keyboard.c (recursive_edit_1): Call cancel_hourglass |
* keyboard.c (recursive_edit_1): Call cancel_hourglass |