# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 873897307 0
# Node ID 1e35c1c533dbf5a5128facbe3499048d8528252d
# Parent  18197e422b9ff8d3912d6b943f78416471365933
(sendmail-send-it): The priority of coding
system for encoding outgoing mails is (1) local value of
buffer-file-coding-system, (2) sendmail-coding-syste, (3)
default-buffer-file-coding-system.

diff -r 18197e422b9f -r 1e35c1c533db lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Wed Sep 10 13:14:45 1997 +0000
+++ b/lisp/mail/sendmail.el	Wed Sep 10 13:15:07 1997 +0000
@@ -619,8 +619,11 @@
 	delimline
 	fcc-was-found
 	(mailbuf (current-buffer))
-	(sendmail-coding-system (or buffer-file-coding-system
-				        sendmail-coding-system)))
+	(sendmail-coding-system
+	 (if (local-variable-p 'buffer-file-coding-system)
+	     buffer-file-coding-system
+	   (or sendmail-coding-system
+	       default-buffer-file-coding-system))))
     (unwind-protect
 	(save-excursion
 	  (set-buffer tembuf)