From: Karl Heuer <kwzh@gnu.org>
Date: Wed, 15 Jun 1994 01:09:17 +0000 (+0000)
Subject: (Fsingle_key_description): Allow strings as keys.
X-Git-Tag: emacs-19.34~7959
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1fefcb09d3162b5a698c5e67ea8fa8d960986f99;p=emacs.git

(Fsingle_key_description): Allow strings as keys.
---

diff --git a/src/keymap.c b/src/keymap.c
index 0bd1eb6ac98..4a928848694 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -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.");
     }
 }