From: tomo <tomo>
Date: Thu, 28 Dec 2000 10:12:27 +0000 (+0000)
Subject: (default-mime-charset-for-write): Use `mime-charset-p' instead of
X-Git-Tag: semi21-D20010129~4
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ee352e23a973da65c71005e47784e13903620b0b;p=elisp%2Flemi.git

(default-mime-charset-for-write): Use `mime-charset-p' instead of
`find-coding-system'; don't require `pces'.
---

diff --git a/mime/mcharset.el b/mime/mcharset.el
index 05babb4..124453d 100644
--- a/mime/mcharset.el
+++ b/mime/mcharset.el
@@ -1,6 +1,6 @@
 ;;; mcharset.el --- MIME charset API
 
-;; Copyright (C) 1997,1998,1999 Free Software Foundation, Inc.
+;; Copyright (C) 1997,1998,1999,2000 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <tomo@m17n.org>
 ;; Keywords: emulation, compatibility, Mule
@@ -38,8 +38,7 @@
        (require 'mcs-ltn1)))
 
 (defcustom default-mime-charset-for-write
-  (if (and (fboundp 'find-coding-system)
-	   (find-coding-system 'utf-8))
+  (if (mime-charset-p 'utf-8)
       'utf-8
     'x-ctext)
   "Default value of MIME-charset for encoding.