From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 29 Apr 1994 01:10:33 +0000 (+0000)
Subject: (Fsingle_key_description): Accept strings as keys since the buffer menu uses
X-Git-Tag: emacs-19.34~8670
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f88480e30dfb849fdde4237b386f9e7166fe0ecf;p=emacs.git

(Fsingle_key_description): Accept strings as keys since the buffer menu uses
them.
---

diff --git a/src/keymap.c b/src/keymap.c
index 44563286e72..55745ffcb39 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1438,8 +1438,11 @@ Control characters turn into C-whatever, etc.")
     case Lisp_Symbol:		/* Function key or event-symbol */
       return Fsymbol_name (key);
 
+    case Lisp_String:
+      return key;
+
     default:
-      error ("KEY must be an integer, cons, or symbol.");
+      error ("KEY must be an integer, cons, string, or symbol.");
     }
 }