From 2c3b35b0cd1a35516623cae344c14b1bfde68c21 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 5 May 1994 20:25:41 +0000 Subject: [PATCH] (describe_map): Ignore bindings for all except symbols and integers. --- src/keymap.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/src/keymap.c b/src/keymap.c index 6d535751dc9..222455328a2 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -2073,9 +2073,12 @@ describe_map (map, keys, elt_describer, partial, shadow, seen) 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. */ -- 2.39.5