(message-make-forward-subject): Use

[elisp/gnus.git-] / lisp / message.el

diff --git a/lisp/message.el b/lisp/message.el
index 63cdc3e..10d6028 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3670,7 +3670,8 @@ header line with the old Message-ID."
       (concat "[" (or (message-fetch-field
                       (if (message-news-p) "newsgroups" "from"))
                      "(nowhere)")
-             "] " (or (message-fetch-field "Subject") "")))))
+             "] " (or (eword-decode-unstructured-field-body
+                       (message-fetch-field "Subject") ""))))))
 
 ;;;###autoload
 (defun message-forward (&optional news)