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.  */