[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/keymap.c [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/src/keymap.c [lexbind] |
Date: |
Sat, 04 Sep 2004 05:45:34 -0400 |
Index: emacs/src/keymap.c
diff -c emacs/src/keymap.c:1.263.2.8 emacs/src/keymap.c:1.263.2.9
*** emacs/src/keymap.c:1.263.2.8 Sat Sep 4 09:19:27 2004
--- emacs/src/keymap.c Sat Sep 4 09:21:46 2004
***************
*** 130,139 ****
DEFUN ("make-keymap", Fmake_keymap, Smake_keymap, 0, 1, 0,
doc: /* Construct and return a new keymap, of the form (keymap
CHARTABLE . ALIST).
! CHARTABLE is a char-table that holds the bindings for the ASCII
! characters. ALIST is an assoc-list which holds bindings for function keys,
! mouse events, and any other things that appear in the input stream.
! All entries in it are initially nil, meaning "command undefined".
The optional arg STRING supplies a menu name for the keymap
in case you use it as a menu with `x-popup-menu'. */)
--- 130,140 ----
DEFUN ("make-keymap", Fmake_keymap, Smake_keymap, 0, 1, 0,
doc: /* Construct and return a new keymap, of the form (keymap
CHARTABLE . ALIST).
! CHARTABLE is a char-table that holds the bindings for all characters
! without modifiers. All entries in it are initially nil, meaning
! "command undefined". ALIST is an assoc-list which holds bindings for
! function keys, mouse events, and any other things that appear in the
! input stream. Initially, ALIST is nil.
The optional arg STRING supplies a menu name for the keymap
in case you use it as a menu with `x-popup-menu'. */)
***************
*** 728,734 ****
DEFUN ("map-keymap", Fmap_keymap, Smap_keymap, 2, 2, 0,
doc: /* Call FUNCTION for every binding in KEYMAP.
! FUNCTION is called with two arguments: the event and its binding. */)
(function, keymap)
Lisp_Object function, keymap;
{
--- 729,738 ----
DEFUN ("map-keymap", Fmap_keymap, Smap_keymap, 2, 2, 0,
doc: /* Call FUNCTION for every binding in KEYMAP.
! FUNCTION is called with two arguments: the event and its binding.
! If KEYMAP has a parent, the parent's bindings are included as well.
! This works recursively: if the parent has itself a parent, then the
! grandparent's bindings are also included and so on. */)
(function, keymap)
Lisp_Object function, keymap;
{
***************
*** 1602,1608 ****
DEFUN ("local-key-binding", Flocal_key_binding, Slocal_key_binding, 1, 2, 0,
doc: /* Return the binding for command KEYS in current local keymap
only.
! KEYS is a string, a sequence of keystrokes.
The binding is probably a symbol with a function definition.
If optional argument ACCEPT-DEFAULT is non-nil, recognize default
--- 1606,1612 ----
DEFUN ("local-key-binding", Flocal_key_binding, Slocal_key_binding, 1, 2, 0,
doc: /* Return the binding for command KEYS in current local keymap
only.
! KEYS is a string or vector, a sequence of keystrokes.
The binding is probably a symbol with a function definition.
If optional argument ACCEPT-DEFAULT is non-nil, recognize default
***************
*** 1621,1627 ****
DEFUN ("global-key-binding", Fglobal_key_binding, Sglobal_key_binding, 1, 2,
0,
doc: /* Return the binding for command KEYS in current global keymap
only.
! KEYS is a string, a sequence of keystrokes.
The binding is probably a symbol with a function definition.
This function's return values are the same as those of `lookup-key'
\(which see).
--- 1625,1631 ----
DEFUN ("global-key-binding", Fglobal_key_binding, Sglobal_key_binding, 1, 2,
0,
doc: /* Return the binding for command KEYS in current global keymap
only.
! KEYS is a string or vector, a sequence of keystrokes.
The binding is probably a symbol with a function definition.
This function's return values are the same as those of `lookup-key'
\(which see).
***************
*** 2572,2578 ****
DEFUN ("where-is-internal", Fwhere_is_internal, Swhere_is_internal, 1, 5, 0,
doc: /* Return list of keys that invoke DEFINITION.
! If KEYMAP is non-nil, search only KEYMAP and the global keymap.
If KEYMAP is nil, search all the currently active keymaps.
If KEYMAP is a list of keymaps, search only those keymaps.
--- 2576,2582 ----
DEFUN ("where-is-internal", Fwhere_is_internal, Swhere_is_internal, 1, 5, 0,
doc: /* Return list of keys that invoke DEFINITION.
! If KEYMAP is a keymap, search only KEYMAP and the global keymap.
If KEYMAP is nil, search all the currently active keymaps.
If KEYMAP is a list of keymaps, search only those keymaps.
***************
*** 2580,2587 ****
rather than a list of all possible key sequences.
If FIRSTONLY is the symbol `non-ascii', return the first binding found,
no matter what it is.
! If FIRSTONLY has another non-nil value, prefer sequences of ASCII characters,
! and entirely reject menu bindings.
If optional 4th arg NOINDIRECT is non-nil, don't follow indirections
to other keymaps or slots. This makes it possible to search for an
--- 2584,2591 ----
rather than a list of all possible key sequences.
If FIRSTONLY is the symbol `non-ascii', return the first binding found,
no matter what it is.
! If FIRSTONLY has another non-nil value, prefer sequences of ASCII characters
! \(or their meta variants) and entirely reject menu bindings.
If optional 4th arg NOINDIRECT is non-nil, don't follow indirections
to other keymaps or slots. This makes it possible to search for an
***************
*** 3751,3757 ****
DEFVAR_LISP ("key-translation-map", &Vkey_translation_map,
doc: /* Keymap of key translations that can override keymaps.
This keymap works like `function-key-map', but comes after that,
! and applies even for keys that have ordinary bindings. */);
Vkey_translation_map = Qnil;
staticpro (&Vmouse_events);
--- 3755,3761 ----
DEFVAR_LISP ("key-translation-map", &Vkey_translation_map,
doc: /* Keymap of key translations that can override keymaps.
This keymap works like `function-key-map', but comes after that,
! and its non-prefix bindings override ordinary bindings. */);
Vkey_translation_map = Qnil;
staticpro (&Vmouse_events);