Mercurial > emacs
changeset 7341:516dd16e2017
(describe_map): Ignore bindings for all except symbols and integers.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 05 May 1994 20:25:41 +0000 |
parents | 1c2342e0edae |
children | 4cf4669565af |
files | src/keymap.c |
diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keymap.c Thu May 05 19:31:09 1994 +0000 +++ b/src/keymap.c Thu May 05 20:25:41 1994 +0000 @@ -2073,9 +2073,12 @@ else if (CONSP (XCONS (tail)->car)) { event = XCONS (XCONS (tail)->car)->car; - /* Don't show individual items in the Buffers menu. */ - if (STRINGP (event)) + + /* Ignore bindings whose "keys" are not really valid events. + (We get these in the frames and buffers menu.) */ + if (! (SYMBOLP (event) || INTEGERP (event))) continue; + definition = get_keyelt (XCONS (XCONS (tail)->car)->cdr, 0); /* Don't show undefined commands or suppressed commands. */