Mercurial > emacs

changeset 7191:bd2f9c5ee54e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fsingle_key_description): Undo previous change. (describe_map): Skip string entries.
author Karl Heuer <kwzh@gnu.org>
date Fri, 29 Apr 1994 06:05:19 +0000
parents 07c5d4989d9e
children 8a8acd6da9be
files src/keymap.c
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/keymap.c	Fri Apr 29 05:48:36 1994 +0000
+++ b/src/keymap.c	Fri Apr 29 06:05:19 1994 +0000
@@ -1438,11 +1438,8 @@
     case Lisp_Symbol:		/* Function key or event-symbol */
       return Fsymbol_name (key);
 
-    case Lisp_String:
-      return key;
-
     default:
-      error ("KEY must be an integer, cons, string, or symbol.");
+      error ("KEY must be an integer, cons, or symbol.");
     }
 }
 
@@ -2076,6 +2073,9 @@
       else if (CONSP (XCONS (tail)->car))
 	{
 	  event = XCONS (XCONS (tail)->car)->car;
+	  /* Don't show individual items in the Buffers menu.  */
+	  if (STRINGP (event))
+	    continue;
 	  definition = get_keyelt (XCONS (XCONS (tail)->car)->cdr, 0);
 
 	  /* Don't show undefined commands or suppressed commands.  */