From: morioka <morioka>
Date: Fri, 17 Apr 1998 00:43:43 +0000 (+0000)
Subject: Move MIME charset features to emu-e20.el again.
X-Git-Tag: apel-8_3~17
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7b29257d8e5b741634916e7d39c733cc2cb57a42;p=elisp%2Fapel.git

Move MIME charset features to emu-e20.el again.
---

diff --git a/emu-e20_2.el b/emu-e20_2.el
index b6cf55f..3781a81 100644
--- a/emu-e20_2.el
+++ b/emu-e20_2.el
@@ -28,42 +28,6 @@
 
 ;;; Code:
 
-;;; @ MIME charset
-;;;
-
-(defsubst encode-mime-charset-region (start end charset)
-  "Encode the text between START and END as MIME CHARSET."
-  (let (cs)
-    (if (and enable-multibyte-characters
-	     (setq cs (mime-charset-to-coding-system charset)))
-	(encode-coding-region start end cs)
-      )))
-
-(defsubst decode-mime-charset-region (start end charset)
-  "Decode the text between START and END as MIME CHARSET."
-  (let (cs)
-    (if (and enable-multibyte-characters
-	     (setq cs (mime-charset-to-coding-system charset)))
-	(decode-coding-region start end cs)
-      )))
-
-(defsubst encode-mime-charset-string (string charset)
-  "Encode the STRING as MIME CHARSET."
-  (let (cs)
-    (if (and enable-multibyte-characters
-	     (setq cs (mime-charset-to-coding-system charset)))
-	(encode-coding-string string cs)
-      string)))
-
-(defsubst decode-mime-charset-string (string charset)
-  "Decode the STRING as MIME CHARSET."
-  (let (cs)
-    (if (and enable-multibyte-characters
-	     (setq cs (mime-charset-to-coding-system charset)))
-	(decode-coding-string string cs)
-      string)))
-
-
 ;;; @ character
 ;;;