diff lisp/gnus/rfc2047.el @ 33815:61c7f3065929

(rfc2047-encode-message-header): Don't encode if default-enable-multibyte-characters is nil.
author Dave Love <fx@gnu.org>
date Thu, 23 Nov 2000 16:09:21 +0000
parents d401dfab680a
children 79dde983f45b
line wrap: on
line diff
--- a/lisp/gnus/rfc2047.el	Thu Nov 23 16:08:38 2000 +0000
+++ b/lisp/gnus/rfc2047.el	Thu Nov 23 16:09:21 2000 +0000
@@ -141,11 +141,15 @@
 	      (rfc2047-encode-region (point-min) (point-max)))
 	     ((eq method 'default)
 	      (if (and (featurep 'mule)
+		       (if (boundp 'default-enable-multibyte-characters)
+			   default-enable-multibyte-characters)
 		       mail-parse-charset)
 		  (mm-encode-coding-region (point-min) (point-max)
 					   mail-parse-charset)))
 	     ((mm-coding-system-p method)
-	      (if (featurep 'mule)
+	      (if (and (featurep 'mule)
+		       (if (boundp 'default-enable-multibyte-characters)
+			   default-enable-multibyte-characters))
 		  (mm-encode-coding-region (point-min) (point-max) method)))
 	     ;; Hm.
 	     (t)))