diff options
| author | Miles Bader | 2004-08-10 07:46:40 +0000 |
|---|---|---|
| committer | Miles Bader | 2004-08-10 07:46:40 +0000 |
| commit | 1322bdcbf48485396604a6196ad953e4ac96ab19 (patch) | |
| tree | 507b63c76d153ce09636fadb88057de967cffe12 /src/keymap.c | |
| parent | cc02ceeea1c29881f88c715e6bfa6e80d7bfb2be (diff) | |
| parent | 72f2b52554110518f03f81556c2192413700ad97 (diff) | |
| download | emacs-1322bdcbf48485396604a6196ad953e4ac96ab19.tar.gz emacs-1322bdcbf48485396604a6196ad953e4ac96ab19.zip | |
Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-29
Merge from lorentey@elte.hu--2004/emacs--multi-tty--0, emacs--cvs-trunk--0
Patches applied:
* lorentey@elte.hu--2004/emacs--multi-tty--0--patch-224
Added sorted-doc to backup regex in lib-src.
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-479
- miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-482
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-483
Build-in-place tweak
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-484
- miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-485
Update from CVS
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/src/keymap.c b/src/keymap.c index 98e04f65717..36e33f9610f 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -131,10 +131,11 @@ static void silly_event_symbol_error P_ ((Lisp_Object)); | |||
| 131 | 131 | ||
| 132 | DEFUN ("make-keymap", Fmake_keymap, Smake_keymap, 0, 1, 0, | 132 | DEFUN ("make-keymap", Fmake_keymap, Smake_keymap, 0, 1, 0, |
| 133 | doc: /* Construct and return a new keymap, of the form (keymap CHARTABLE . ALIST). | 133 | doc: /* Construct and return a new keymap, of the form (keymap CHARTABLE . ALIST). |
| 134 | CHARTABLE is a char-table that holds the bindings for the ASCII | 134 | CHARTABLE is a char-table that holds the bindings for all characters |
| 135 | characters. ALIST is an assoc-list which holds bindings for function keys, | 135 | without modifiers. All entries in it are initially nil, meaning |
| 136 | mouse events, and any other things that appear in the input stream. | 136 | "command undefined". ALIST is an assoc-list which holds bindings for |
| 137 | All entries in it are initially nil, meaning "command undefined". | 137 | function keys, mouse events, and any other things that appear in the |
| 138 | input stream. Initially, ALIST is nil. | ||
| 138 | 139 | ||
| 139 | The optional arg STRING supplies a menu name for the keymap | 140 | The optional arg STRING supplies a menu name for the keymap |
| 140 | in case you use it as a menu with `x-popup-menu'. */) | 141 | in case you use it as a menu with `x-popup-menu'. */) |
| @@ -703,7 +704,10 @@ map_keymap_call (key, val, fun, dummy) | |||
| 703 | 704 | ||
| 704 | DEFUN ("map-keymap", Fmap_keymap, Smap_keymap, 2, 2, 0, | 705 | DEFUN ("map-keymap", Fmap_keymap, Smap_keymap, 2, 2, 0, |
| 705 | doc: /* Call FUNCTION for every binding in KEYMAP. | 706 | doc: /* Call FUNCTION for every binding in KEYMAP. |
| 706 | FUNCTION is called with two arguments: the event and its binding. */) | 707 | FUNCTION is called with two arguments: the event and its binding. |
| 708 | If KEYMAP has a parent, the parent's bindings are included as well. | ||
| 709 | This works recursively: if the parent has itself a parent, then the | ||
| 710 | grandparent's bindings are also included and so on. */) | ||
| 707 | (function, keymap) | 711 | (function, keymap) |
| 708 | Lisp_Object function, keymap; | 712 | Lisp_Object function, keymap; |
| 709 | { | 713 | { |
| @@ -1635,7 +1639,7 @@ is non-nil, `key-binding' returns the unmapped command. */) | |||
| 1635 | 1639 | ||
| 1636 | DEFUN ("local-key-binding", Flocal_key_binding, Slocal_key_binding, 1, 2, 0, | 1640 | DEFUN ("local-key-binding", Flocal_key_binding, Slocal_key_binding, 1, 2, 0, |
| 1637 | doc: /* Return the binding for command KEYS in current local keymap only. | 1641 | doc: /* Return the binding for command KEYS in current local keymap only. |
| 1638 | KEYS is a string, a sequence of keystrokes. | 1642 | KEYS is a string or vector, a sequence of keystrokes. |
| 1639 | The binding is probably a symbol with a function definition. | 1643 | The binding is probably a symbol with a function definition. |
| 1640 | 1644 | ||
| 1641 | If optional argument ACCEPT-DEFAULT is non-nil, recognize default | 1645 | If optional argument ACCEPT-DEFAULT is non-nil, recognize default |
| @@ -1654,7 +1658,7 @@ bindings; see the description of `lookup-key' for more details about this. */) | |||
| 1654 | 1658 | ||
| 1655 | DEFUN ("global-key-binding", Fglobal_key_binding, Sglobal_key_binding, 1, 2, 0, | 1659 | DEFUN ("global-key-binding", Fglobal_key_binding, Sglobal_key_binding, 1, 2, 0, |
| 1656 | doc: /* Return the binding for command KEYS in current global keymap only. | 1660 | doc: /* Return the binding for command KEYS in current global keymap only. |
| 1657 | KEYS is a string, a sequence of keystrokes. | 1661 | KEYS is a string or vector, a sequence of keystrokes. |
| 1658 | The binding is probably a symbol with a function definition. | 1662 | The binding is probably a symbol with a function definition. |
| 1659 | This function's return values are the same as those of `lookup-key' | 1663 | This function's return values are the same as those of `lookup-key' |
| 1660 | \(which see). | 1664 | \(which see). |
| @@ -2561,7 +2565,7 @@ where_is_internal (definition, keymaps, firstonly, noindirect, no_remap) | |||
| 2561 | 2565 | ||
| 2562 | DEFUN ("where-is-internal", Fwhere_is_internal, Swhere_is_internal, 1, 5, 0, | 2566 | DEFUN ("where-is-internal", Fwhere_is_internal, Swhere_is_internal, 1, 5, 0, |
| 2563 | doc: /* Return list of keys that invoke DEFINITION. | 2567 | doc: /* Return list of keys that invoke DEFINITION. |
| 2564 | If KEYMAP is non-nil, search only KEYMAP and the global keymap. | 2568 | If KEYMAP is a keymap, search only KEYMAP and the global keymap. |
| 2565 | If KEYMAP is nil, search all the currently active keymaps. | 2569 | If KEYMAP is nil, search all the currently active keymaps. |
| 2566 | If KEYMAP is a list of keymaps, search only those keymaps. | 2570 | If KEYMAP is a list of keymaps, search only those keymaps. |
| 2567 | 2571 | ||
| @@ -2569,8 +2573,8 @@ If optional 3rd arg FIRSTONLY is non-nil, return the first key sequence found, | |||
| 2569 | rather than a list of all possible key sequences. | 2573 | rather than a list of all possible key sequences. |
| 2570 | If FIRSTONLY is the symbol `non-ascii', return the first binding found, | 2574 | If FIRSTONLY is the symbol `non-ascii', return the first binding found, |
| 2571 | no matter what it is. | 2575 | no matter what it is. |
| 2572 | If FIRSTONLY has another non-nil value, prefer sequences of ASCII characters, | 2576 | If FIRSTONLY has another non-nil value, prefer sequences of ASCII characters |
| 2573 | and entirely reject menu bindings. | 2577 | \(or their meta variants) and entirely reject menu bindings. |
| 2574 | 2578 | ||
| 2575 | If optional 4th arg NOINDIRECT is non-nil, don't follow indirections | 2579 | If optional 4th arg NOINDIRECT is non-nil, don't follow indirections |
| 2576 | to other keymaps or slots. This makes it possible to search for an | 2580 | to other keymaps or slots. This makes it possible to search for an |
| @@ -3593,7 +3597,7 @@ key, typing `ESC O P x' would return [f1 x]. */); | |||
| 3593 | DEFVAR_LISP ("key-translation-map", &Vkey_translation_map, | 3597 | DEFVAR_LISP ("key-translation-map", &Vkey_translation_map, |
| 3594 | doc: /* Keymap of key translations that can override keymaps. | 3598 | doc: /* Keymap of key translations that can override keymaps. |
| 3595 | This keymap works like `function-key-map', but comes after that, | 3599 | This keymap works like `function-key-map', but comes after that, |
| 3596 | and applies even for keys that have ordinary bindings. */); | 3600 | and its non-prefix bindings override ordinary bindings. */); |
| 3597 | Vkey_translation_map = Qnil; | 3601 | Vkey_translation_map = Qnil; |
| 3598 | 3602 | ||
| 3599 | staticpro (&Vmouse_events); | 3603 | staticpro (&Vmouse_events); |