* mail/rmailout.el (rmail-convert-to-babyl-format): Don't set "unseen".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d59d7577f7fc1752ee8aadee3644c5339da4d945..a4050c3e5ea972e00badd48bc7e8de1f04e6723a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,9 @@
 2009-04-09  Richard M Stallman  <rms@gnu.org>
 
+       * mail/rmailout.el (rmail-convert-to-babyl-format): Don't set "unseen".
+
        * mail/rmailout.el (rmail-output-to-rmail-buffer):
-       Call rmail-modify-format..
+       Call rmail-modify-format.
 
        Don't query before visiting a Babyl file.
        Instead, query before modifications that would save it.

diff --git a/lisp/mail/rmailout.el b/lisp/mail/rmailout.el
index cb34ff4705a6f685880144be36a8eef8416fe00d..b6f20df69a0cd91e99b59f11b45110e8301581e7 100644 (file)
--- a/lisp/mail/rmailout.el
+++ b/lisp/mail/rmailout.el
@@ -169,7 +169,7 @@ display message number MSG."
     (save-restriction
       (unless (looking-at "^From ")
        (error "Invalid mbox message"))
-      (insert "\^L\n0, unseen,,\n*** EOOH ***\n")
+      (insert "\^L\n0,,\n*** EOOH ***\n")
       (rmail-nuke-pinhead-header)
       ;; Decode base64 or quoted printable contents, Rmail style.
       (let* ((header-end (save-excursion