Mercurial > emacs

changeset 29651:31099bb76b6e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fsingle_key_description): Enclose function key and event symbol names in angle brackets.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 14 Jun 2000 13:35:45 +0000
parents 2411aacca614
children 35fabb4b6bab
files src/keymap.c
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/keymap.c	Wed Jun 14 13:34:54 2000 +0000
+++ b/src/keymap.c	Wed Jun 14 13:35:45 2000 +0000
@@ -1952,7 +1952,11 @@
 	}
     }
   else if (SYMBOLP (key))	/* Function key or event-symbol */
-    return Fsymbol_name (key);
+    {
+      char *buffer = (char *) alloca (STRING_BYTES (XSYMBOL (key)->name) + 5);
+      sprintf (buffer, "<%s>", XSYMBOL (key)->name->data);
+      return build_string (buffer);
+    }
   else if (STRINGP (key))	/* Buffer names in the menubar.  */
     return Fcopy_sequence (key);
   else