X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmm-bodies.el;h=a448b0b1ee077f80a4b1abad9810f504f7b1d855;hb=22d67eb69d38558636bccda449388713db84b44d;hp=3ced083360abca845f86be8d974c21567d2312a5;hpb=625b891fc07e1e5fc5f2658176b6c0e3cb244ee0;p=elisp%2Fgnus.git-

diff --git a/lisp/mm-bodies.el b/lisp/mm-bodies.el
index 3ced083..a448b0b 100644
--- a/lisp/mm-bodies.el
+++ b/lisp/mm-bodies.el
@@ -209,7 +209,7 @@ The characters in CHARSET should then be decoded."
 		   ;; buffer-file-coding-system
 		   ;;Article buffer is nil coding system
 		   ;;in XEmacs
-		   enable-multibyte-characters
+		   (mm-multibyte-p)
 		   (or (not (eq mule-charset 'ascii))
 		       (setq mule-charset mail-parse-charset)))
 	  (mm-decode-coding-region (point-min) (point-max) mule-charset))))))
@@ -225,7 +225,7 @@ The characters in CHARSET should then be decoded."
      (let (mule-charset)
        (when (and charset
 		  (setq mule-charset (mm-charset-to-coding-system charset))
-		  enable-multibyte-characters
+		  (mm-multibyte-p)
 		  (or (not (eq mule-charset 'ascii))
 		      (setq mule-charset mail-parse-charset)))
 	 (mm-decode-coding-string string mule-charset))))