# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1022511117 0
# Node ID df76808e99c0444a7fa6b7e06fffded11f6fd994
# Parent  7b1035a6538b48f72a5f2db007891c5f3b770fc5
(mail-recover-1, mail-recover): Use utf-8-emacs
coding system, not emacs-mule.

diff -r 7b1035a6538b -r df76808e99c0 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Sun May 26 22:56:19 2002 +0000
+++ b/lisp/mail/sendmail.el	Mon May 27 14:51:57 2002 +0000
@@ -1582,7 +1582,7 @@
       (define-key (current-local-map) "v"
 	(lambda ()
 	  (interactive)
-	  (let ((coding-system-for-read 'emacs-mule-unix))
+	  (let ((coding-system-for-read 'utf-8-emacs-unix))
 	    (dired-view-file))))
       (define-key (current-local-map) "\C-c\C-c"
 	(lambda ()
@@ -1590,13 +1590,13 @@
 	  (let ((fname (dired-get-filename))
 		;; Auto-saved files are written in the internal
 		;; representation, so they should be read accordingly.
-		(coding-system-for-read 'emacs-mule-unix))
+		(coding-system-for-read 'utf-8-emacs-unix))
 	    (switch-to-buffer-other-window "*mail*")
 	    (let ((buffer-read-only nil))
 	      (erase-buffer)
 	      (insert-file-contents fname nil)
 	      ;; insert-file-contents will set buffer-file-coding-system
-	      ;; to emacs-mule, which is probably not what they want to
+	      ;; to utf-8-emacs, which is probably not what they want to
 	      ;; use for sending the message.  But we don't know what
 	      ;; was its value before the buffer was killed or Emacs
 	      ;; crashed.  We therefore reset buffer-file-coding-system
@@ -1648,7 +1648,7 @@
 		     (buffer-coding buffer-file-coding-system)
 		     ;; Auto-save files are written in internal
 		     ;; representation of non-ASCII characters.
-		     (coding-system-for-read 'emacs-mule-unix))
+		     (coding-system-for-read 'utf-8-emacs-unix))
 		 (erase-buffer)
 		 (insert-file-contents file-name nil)
 		 (setq buffer-file-coding-system buffer-coding)))))