Mercurial > emacs

diff lisp/gnus/mm-decode.el @ 87928:a5b33bf9597c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1009
author Miles Bader <miles@gnu.org>
date Thu, 24 Jan 2008 07:47:38 +0000
parents 107ccd98fa12
children c70e45a7acfd 5f827896103e
line wrap: on
line diff
--- a/lisp/gnus/mm-decode.el	Thu Jan 24 04:50:50 2008 +0000
+++ b/lisp/gnus/mm-decode.el	Thu Jan 24 07:47:38 2008 +0000
@@ -570,7 +570,10 @@
 	  ;; creates unibyte buffers. This `if', though not a perfect
 	  ;; solution, avoids most of them.
 	  (if from
-	      (setq from (cadr (mail-extract-address-components from))))))
+	      (setq from (cadr (mail-extract-address-components from))))
+	  (if description
+	      (setq description (mail-decode-encoded-word-string
+				 description)))))
       (if (or (not ctl)
 	      (not (string-match "/" (car ctl))))
 	  (mm-dissect-singlepart