diff options
| author | Stefan Monnier | 2000-10-15 03:31:32 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2000-10-15 03:31:32 +0000 |
| commit | db785038bbd32a5d2fb074a7b5616f2b5b4e4dcd (patch) | |
| tree | c1cbec44aa60bc1fa46455b037b877091c7a96da /src/lisp.h | |
| parent | 86b7fcbb0c141f7b43d17557da6ff9c8a8716812 (diff) | |
| download | emacs-db785038bbd32a5d2fb074a7b5616f2b5b4e4dcd.tar.gz emacs-db785038bbd32a5d2fb074a7b5616f2b5b4e4dcd.zip | |
* keymap.c (access_keymap): Add AUTOLOAD parameter.
Do the meta->esc mapping. Call get_keyelt before returning.
Start scanning from the second element (the first is always `keymap')
to make it easier to detect when we reach a parent map.
Handle the case of inheriting from a symbol whose function is a map.
(Fkeymap_parent): Also handle the `inherit from symbol' case.
(fix_submap_inheritance, Fdefine_key): Update call to access_keymap.
(get_keyelt, Flookup_key): Update call to access_keymap.
Remove the meta->esc mappings.
(define_as_prefix): Delete old disabled code.
(menu_item_p): New function.
(where_is_internal_1): Skip over the few remaining menu items.
* lisp.h (access_keymap): Update prototype.
* keyboard.c (read_char, menu_bar_items, tool_bar_items):
Update call to access_keymap.
(follow_key, read_key_sequence): Update calls to access_keymap.
Remove the meta->esc mappings.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lisp.h b/src/lisp.h index 9f5a94408e9..19620d93cea 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -2591,7 +2591,7 @@ EXFUN (Fkey_binding, 2); | |||
| 2591 | EXFUN (Fkey_description, 1); | 2591 | EXFUN (Fkey_description, 1); |
| 2592 | EXFUN (Fsingle_key_description, 2); | 2592 | EXFUN (Fsingle_key_description, 2); |
| 2593 | EXFUN (Fwhere_is_internal, 4); | 2593 | EXFUN (Fwhere_is_internal, 4); |
| 2594 | extern Lisp_Object access_keymap P_ ((Lisp_Object, Lisp_Object, int, int)); | 2594 | extern Lisp_Object access_keymap P_ ((Lisp_Object, Lisp_Object, int, int, int)); |
| 2595 | extern Lisp_Object get_keyelt P_ ((Lisp_Object, int)); | 2595 | extern Lisp_Object get_keyelt P_ ((Lisp_Object, int)); |
| 2596 | extern Lisp_Object get_keymap P_ ((Lisp_Object)); | 2596 | extern Lisp_Object get_keymap P_ ((Lisp_Object)); |
| 2597 | extern Lisp_Object get_keymap_1 P_ ((Lisp_Object, int, int)); | 2597 | extern Lisp_Object get_keymap_1 P_ ((Lisp_Object, int, int)); |