(rmail-convert-mbox-format): Handle mails without subject.

diff --git a/lisp/mail/ChangeLog b/lisp/mail/ChangeLog
index 1ee465199f865afd5b94498bcad609846029fac4..78f98844f6c274ae15ad6b3a08c4e34db927ed22 100644 (file)
--- a/lisp/mail/ChangeLog
+++ b/lisp/mail/ChangeLog
@@ -1,3 +1,7 @@
+2006-02-01  Alex Schroeder  <alex@gnu.org>
+
+       * rmail.el (rmail-convert-mbox-format): Handle mails without subject.
+
 2006-02-01  Henrik Enberg  <enberg@printf.se>
 
        * rmail.el (rmail-first-unseen-message): Make sure to return the

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 3c2c29ec985433fb6b17f75833a3995fe2305aad..1ac64f217cdf1df5d5687b39c946fc415105c140 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1995,8 +1995,9 @@ non-nil then do not show any progress messages."
            ;; Convert encoded-words in from and subject
            (dolist (header '("From" "Subject"))
              (let ((value (rmail-header-get-header header)))
-               (rmail-header-add-header
-                header (mail-decode-encoded-word-string value))))
+               (when value
+                 (rmail-header-add-header
+                  header (mail-decode-encoded-word-string value)))))
            ;; Convert quoted printable transfer encoding because it
            ;; is easy to do.
            (let ((encoding (rmail-header-get-header