changeset 19202:e32501a34d5c

(sendmail-send-it): Bind sendmail-coding-system to buffer-file-coding-system if it is non-nil.
author Kenichi Handa <handa@m17n.org>
date Thu, 07 Aug 1997 04:18:18 +0000
parents f502f8e2322a
children 58c50205001d
files lisp/mail/sendmail.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/sendmail.el	Thu Aug 07 03:52:11 1997 +0000
+++ b/lisp/mail/sendmail.el	Thu Aug 07 04:18:18 1997 +0000
@@ -590,7 +590,9 @@
 	resend-to-addresses
 	delimline
 	fcc-was-found
-	(mailbuf (current-buffer)))
+	(mailbuf (current-buffer))
+	(sendmail-coding-system (or buffer-file-coding-system
+				        sendmail-coding-system)))
     (unwind-protect
 	(save-excursion
 	  (set-buffer tembuf)