From: morioka Date: Mon, 3 Mar 1997 17:40:55 +0000 (+0000) Subject: Require emu; Function `char-list-to-string' was abolished. X-Git-Tag: Hokutetsu-Ishikawa-new~204 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e15627a806dec19d918fc716fcc2ed2155b7947b;p=elisp%2Fsemi.git Require emu; Function `char-list-to-string' was abolished. --- diff --git a/mime-parse.el b/mime-parse.el index f5d23bb..2dc255e 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 -;; Version: $Id: mime-parse.el,v 0.6 1997-02-27 13:48:48 tmorioka Exp $ +;; Version: $Id: mime-parse.el,v 0.7 1997-03-03 17:40:55 morioka Exp $ ;; Keywords: parse, MIME, multimedia, mail, news ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -25,6 +25,7 @@ ;;; Code: +(require 'emu) (require 'std11) (require 'mime-def) @@ -76,11 +77,6 @@ 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) "]"))