From feaae63952c9e17b0bd96a4f38c767f453c4eb98 Mon Sep 17 00:00:00 2001
From: tmorioka <tmorioka>
Date: Thu, 27 Feb 1997 13:48:48 +0000
Subject: [PATCH] (char-list-to-string): New inline-function; copied from
 emu-19.el.

---
 mime-parse.el |    7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/mime-parse.el b/mime-parse.el
index c380312..f5d23bb 100644
--- a/mime-parse.el
+++ b/mime-parse.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1994,1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: mime-parse.el,v 0.5 1997-02-27 13:43:38 tmorioka Exp $
+;; Version: $Id: mime-parse.el,v 0.6 1997-02-27 13:48:48 tmorioka Exp $
 ;; Keywords: parse, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -76,6 +76,11 @@ which are string or symbol."
 (defsubst regexp-* (regexp)
   (concat regexp "*"))
 
+(defsubst char-list-to-string (char-list)
+  "Convert list of character CHAR-LIST to string."
+  (mapconcat (function char-to-string) char-list "")
+  )
+
 (defconst rfc822/quoted-pair-regexp "\\\\.")
 (defconst rfc822/qtext-regexp
   (concat "[^" (char-list-to-string std11-non-qtext-char-list) "]"))
-- 
1.7.10.4