Mercurial > emacs
changeset 88274:8a210508c1d6
*** empty log message ***
| author | Henrik Enberg <henrik.enberg@telia.com> |
|---|---|
| date | Sun, 22 Jan 2006 05:51:48 +0000 |
| parents | d30c56339f08 |
| children | 7f1829816ec2 |
| files | lisp/mail/ChangeLog lisp/mail/rmail.el |
| diffstat | 2 files changed, 12 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/ChangeLog Sun Jan 22 05:45:47 2006 +0000 +++ b/lisp/mail/ChangeLog Sun Jan 22 05:51:48 2006 +0000 @@ -1,3 +1,14 @@ +2006-01-22 Henrik Enberg <enberg@printf.se> + + * rmail.el (rmail): Go back to using find-file for reading in the + mail file. This avoids gratuitous modification of the file. + (rmail-decode-region): Doc string, cleanup. + (rmail-decode-by-content-type): New function. + (rmail-decode-messages): Use it. Add FROM and TO args and only + process messages in that region. + (rmail-get-new-mail): Call `rmail-decode-region' before + `rmail-process-new-messages'. + 2006-01-21 Alex Schroeder <alex@gnu.org> * rmail.el (rmail-decode-messages): Decoded encoded-words in
--- a/lisp/mail/rmail.el Sun Jan 22 05:45:47 2006 +0000 +++ b/lisp/mail/rmail.el Sun Jan 22 05:51:48 2006 +0000 @@ -1775,7 +1775,7 @@ ;; Process each message in turn starting from the back and ;; proceeding to the front of the region. This is especially a good ;; approach since the buffer will likely have new headers added. - (save-excursion + (save-restriction (narrow-to-region from to) (let ((inhibit-read-only t) (case-fold-search nil)