(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 (file)
--- 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.