Synch with Gnus.

[elisp/gnus.git-] / lisp / mm-extern.el

diff --git a/lisp/mm-extern.el b/lisp/mm-extern.el
index e9c07fb..5e58a12 100644 (file)
--- a/lisp/mm-extern.el
+++ b/lisp/mm-extern.el
@@ -144,7 +144,10 @@ If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing."
            (unless good
              (mm-destroy-parts handles))))
        (mm-handle-set-cache handle handles))
-      (push handles gnus-article-mime-handles))
+      (if (listp (car gnus-article-mime-handles))
+         (push handles gnus-article-mime-handles)
+       (setq gnus-article-mime-handles
+             (list handles gnus-article-mime-handles))))
     (unless no-display
       (save-excursion
        (save-restriction