From: Henrik Enberg <henrik.enberg@telia.com>
Date: Sun, 22 Jan 2006 05:51:48 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9958e200dc14c3e94996fc007f23abd639e887ab;p=emacs.git

*** empty log message ***
---

diff --git a/lisp/mail/ChangeLog b/lisp/mail/ChangeLog
index d0f732d43ef..fc1f12e0c34 100644
--- a/lisp/mail/ChangeLog
+++ b/lisp/mail/ChangeLog
@@ -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
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index f4dff6ced60..275119bce9e 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1775,7 +1775,7 @@ If CODING is nil or an invalid coding system, decode by `undecided'."
   ;; 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)