From: morioka <morioka>
Date: Mon, 19 Oct 1998 18:34:19 +0000 (+0000)
Subject: (char-list-to-string): New function.
X-Git-Tag: apel-9_5~20
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a86a169f6f8595b13d023ac870981e4503642855;p=elisp%2Fapel.git

(char-list-to-string): New function.
---

diff --git a/emu.el b/emu.el
index 8dc9928..030900c 100644
--- a/emu.el
+++ b/emu.el
@@ -82,6 +82,10 @@
 (require 'poem)
 (require 'mcharset)
 
+(defsubst char-list-to-string (char-list)
+  "Convert list of character CHAR-LIST to string."
+  (apply (function string) char-list))
+
 (cond ((featurep 'mule)
        (cond ((featurep 'xemacs) ; for XEmacs with MULE
 	      ;; old Mule emulating aliases