# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1233326197 0
# Node ID 5fd0ba414a8c1c4ffaf60d42ea8853739746531f
# Parent  9c67a492eb5927015b2aaa0ab0151529e60dfc8c
(rmail-convert-babyl-to-mbox): Bind coding-system-for-read to `raw-text', and
use insert-file-contents instead of insert-file-contents-literally.
Fixes bug #2019.

diff -r 9c67a492eb59 -r 5fd0ba414a8c lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Fri Jan 30 13:06:07 2009 +0000
+++ b/lisp/mail/rmail.el	Fri Jan 30 14:36:37 2009 +0000
@@ -915,9 +915,10 @@
 	  (write-region (point-min) (point-max) old-file)
 	  (unrmail old-file new-file)
 	  (message "Replacing BABYL format with mbox format...")
-	  (let ((inhibit-read-only t))
+	  (let ((inhibit-read-only t)
+		(coding-system-for-read 'raw-text))
 	    (erase-buffer)
-	    (insert-file-contents-literally new-file)
+	    (insert-file-contents new-file)
 	    (rmail-mode-1)
 	    (rmail-perm-variables)
 	    (rmail-variables)