From: yamaoka <yamaoka>
Date: Tue, 27 Sep 2005 05:36:50 +0000 (+0000)
Subject: Synch to No Gnus 200509270536.
X-Git-Tag: t-gnus-6_17_4-quimby-~343
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c6b3bbada37947d4160706ec0d9bfdc55db7270f;p=elisp%2Fgnus.git-

Synch to No Gnus 200509270536.
---

diff --git a/lisp/mm-decode.el b/lisp/mm-decode.el
index bc75be5..0fc4f4b 100644
--- a/lisp/mm-decode.el
+++ b/lisp/mm-decode.el
@@ -1051,16 +1051,16 @@ external if displayed external."
 
 (defun mm-insert-part (handle)
   "Insert the contents of HANDLE in the current buffer."
-  (let ((charset (mail-content-type-get (mm-handle-type handle) 'charset)))
-    (save-excursion
-      (insert
-       (cond ((eq charset 'gnus-decoded)
-	      (with-current-buffer (mm-handle-buffer handle)
-		(buffer-string)))
-	     ((mm-multibyte-p)
-	      (mm-string-as-multibyte (mm-get-part handle)))
-	     (t
-	      (mm-get-part handle)))))))
+  (save-excursion
+    (insert
+     (cond ((eq (mail-content-type-get (mm-handle-type handle) 'charset)
+		'gnus-decoded)
+	    (with-current-buffer (mm-handle-buffer handle)
+	      (buffer-string)))
+	   ((mm-multibyte-p)
+	    (mm-string-as-multibyte (mm-get-part handle)))
+	   (t
+	    (mm-get-part handle))))))
 
 (defun mm-file-name-delete-whitespace (file-name)
   "Remove all whitespace characters from FILE-NAME."