Index: mml.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/mml.el,v
retrieving revision 5.29
retrieving revision 5.30
diff -u -r5.29 -r5.30
--- mml.el	1999/09/27 15:19:03	5.29
+++ mml.el	1999/11/05 03:36:48	5.30
@@ -242,7 +242,8 @@
 	    (insert-buffer-substring (cdr (assq 'buffer cont))))
 	   ((and (setq filename (cdr (assq 'filename cont)))
 		 (not (equal (cdr (assq 'nofile cont)) "yes")))
-	    (mm-insert-file-contents filename nil nil nil nil t))
+	    (let ((coding-system-for-read mm-binary-coding-system))
+	      (mm-insert-file-contents filename nil nil nil nil t)))
 	   (t
 	    (insert (cdr (assq 'contents cont)))))
 	  (setq encoding (mm-encode-buffer type)