Index: mm-util.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/mm-util.el,v
retrieving revision 6.22
diff -u -r6.22 mm-util.el
--- mm-util.el	2001/08/04 02:13:35	6.22
+++ mm-util.el	2001/08/31 14:06:06
@@ -356,10 +356,7 @@
     (when (memq 'iso-2022-jp-2 charsets)
       (setq charsets (delq 'iso-2022-jp charsets)))
     (setq charsets (mm-delete-duplicates charsets))
-    (if (and (> (length charsets) 1)
-	     (fboundp 'find-coding-systems-region)
-	     (let ((cs (find-coding-systems-region b e)))
-	       (or (memq 'utf-8 cs) (memq 'mule-utf-8 cs))))
+    (if (> (length charsets))
 	'(utf-8)
       charsets)))