procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Fsingle_key_description): Enclose function key and

Browse source 
event symbol names in angle brackets.
This commit is contained in:
Gerd Moellmann 2000-06-14 13:35:45 +00:00
parent 2a4487aceb
commit c7edb9605f
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/keymap.c
View file

@ -1952,7 +1952,11 @@ Control characters turn into C-whatever, etc.")
} }
} }
else if (SYMBOLP (key)) /* Function key or event-symbol */ 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. */ else if (STRINGP (key)) /* Buffer names in the menubar. */
return Fcopy_sequence (key); return Fcopy_sequence (key);
else else