Commit 1fefcb09 authored by Karl Heuer's avatar Karl Heuer
Browse files

(Fsingle_key_description): Allow strings as keys.

parent 3081bf8d
......@@ -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.");
}
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment