mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-03 18:41:25 -08:00
(Fsingle_key_description): Allow strings as keys.
This commit is contained in:
parent
3081bf8d25
commit
1fefcb09d3
1 changed files with 5 additions and 1 deletions
|
|
@ -1458,8 +1458,12 @@ Control characters turn into C-whatever, etc.")
|
|||
case Lisp_Symbol: /* Function key or event-symbol */
|
||||
return Fsymbol_name (key);
|
||||
|
||||
/* Buffer names in the menubar can trigger this. */
|
||||
case Lisp_String:
|
||||
return Fcopy_sequence (key);
|
||||
|
||||
default:
|
||||
error ("KEY must be an integer, cons, or symbol.");
|
||||
error ("KEY must be an integer, cons, symbol, or string.");
|
||||
}
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue