(describe_map): Ignore bindings for all except symbols and integers.
authorRichard M. Stallman <rms@gnu.org>
Thu, 5 May 1994 20:25:41 +0000 (20:25 +0000)
committerRichard M. Stallman <rms@gnu.org>
Thu, 5 May 1994 20:25:41 +0000 (20:25 +0000)
src/keymap.c

index 6d53575..2224553 100644 (file)
@@ -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.  */