From: morioka <morioka>
Date: Fri, 21 May 1999 10:48:46 +0000 (+0000)
Subject: (default-mime-charset-for-write): Moved to mcharset.el.
X-Git-Tag: apel-9_19~19
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f0eba453abdb09587903c324d20705ebff444348;p=elisp%2Fapel.git

(default-mime-charset-for-write): Moved to mcharset.el.
(default-mime-charset-detect-method-for-write): Likewise.
---

diff --git a/mcs-20.el b/mcs-20.el
index 45949be..c115e4c 100644
--- a/mcs-20.el
+++ b/mcs-20.el
@@ -137,27 +137,6 @@ It must be symbol."
   :group 'i18n
   :type 'mime-charset)
 
-(defcustom default-mime-charset-for-write
-  (if (find-coding-system 'utf-8)
-      'utf-8
-    default-mime-charset)
-  "Default value of MIME-charset for encoding.
-It may be used when suitable MIME-charset is not found.
-It must be symbol."
-  :group 'i18n
-  :type 'mime-charset)
-
-(defcustom default-mime-charset-detect-method-for-write
-  nil
-  "Function called when suitable MIME-charset is not found to encode.
-It must be nil or function.
-If it is nil, variable `default-mime-charset-for-write' is used.
-If it is a function, interface must be (TYPE CHARSETS &rest ARGS).
-CHARSETS is list of charset.
-If TYPE is 'region, ARGS has START and END."
-  :group 'i18n
-  :type '(choice function (const nil)))
-
 (defun detect-mime-charset-region (start end)
   "Return MIME charset for region between START and END."
   (let ((charsets (find-charset-region start end)))