2001-02-02 12:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* mm-util.el (mm-mime-mule-charset-alist): non-Mule case.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b5892d1..df26e1a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-02-02 12:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * mm-util.el (mm-mime-mule-charset-alist): non-Mule case.
+
 2001-01-31  Dave Love  <fx@gnu.org>
 
        * mm-util.el (mm-mime-mule-charset-alist)

diff --git a/lisp/mm-util.el b/lisp/mm-util.el
index 439c660..aefb1bb 100644 (file)
--- a/lisp/mm-util.el
+++ b/lisp/mm-util.el
@@ -71,7 +71,9 @@
                    chinese-cns11643-3 chinese-cns11643-4
                    chinese-cns11643-5 chinese-cns11643-6
                    chinese-cns11643-7)
-    ,(if (or (charsetp 'unicode-a)
+    ,(if (or (not (fboundp 'charsetp)) ;; non-Mule case
+            (not (fboundp 'coding-system-p))
+            (charsetp 'unicode-a)
             (not (coding-system-p 'mule-utf-8)))
         '(utf-8 unicode-a unicode-b unicode-c unicode-d unicode-e)
        ;; If we have utf-8 we're in Mule 5+.