From: morioka <morioka>
Date: Mon, 19 Oct 1998 18:33:33 +0000 (+0000)
Subject: Abolish macro `char-list-to-string'.
X-Git-Tag: apel-9_5~21
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=71258b6964970cdecd1e4eef2b613fb5713f4197;p=elisp%2Fapel.git

Abolish macro `char-list-to-string'.
---

diff --git a/poe-19.el b/poe-19.el
index 62995e6..fbbe7ed 100644
--- a/poe-19.el
+++ b/poe-19.el
@@ -66,16 +66,6 @@
     (point)))
 
 
-;;; @ string
-;;;
-
-(defmacro char-list-to-string (char-list)
-  "Convert list of character CHAR-LIST to string."
-  (` (mapconcat (function char-to-string)
-		(, char-list)
-		"")))
-
-
 ;;; @ end
 ;;;
 
diff --git a/poe-xemacs.el b/poe-xemacs.el
index 475dccc..119f639 100644
--- a/poe-xemacs.el
+++ b/poe-xemacs.el
@@ -104,15 +104,7 @@
     )
 
 
-;;; @ string
-;;;
-
-(defmacro char-list-to-string (char-list)
-  "Convert list of character CHAR-LIST to string. [poe-xemacs.el]"
-  `(mapconcat #'char-to-string ,char-list ""))
-
-
-;;; @@ to avoid bug of XEmacs 19.14
+;;; @ to avoid bug of XEmacs 19.14
 ;;;
 
 (or (string-match "^../"