mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-17 10:06:13 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Richard M. Stallman 2009-04-09 16:46:02 +00:00
parent 9aadce2568
commit f824857fc5
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -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.

2
lisp/mail/rmailout.el
View File

@ -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