Mercurial > emacs
changeset 29648:3c403fa9f76b
(sendmail-send-it): Inherit
buffer-file-coding-system of the current buffer to the temporary
buffer that this funciton uses for work.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Wed, 14 Jun 2000 13:04:57 +0000 |
parents | 7dd86f22995b |
children | 43b4ecc0b133 |
files | lisp/mail/sendmail.el |
diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/sendmail.el Wed Jun 14 13:03:06 2000 +0000 +++ b/lisp/mail/sendmail.el Wed Jun 14 13:04:57 2000 +0000 @@ -773,6 +773,8 @@ 0)) (tembuf (generate-new-buffer " sendmail temp")) (case-fold-search nil) + (coding (and (local-variable-p 'buffer-file-coding-system) + buffer-file-coding-system)) resend-to-addresses delimline fcc-was-found @@ -782,6 +784,7 @@ (set-buffer tembuf) (erase-buffer) (insert-buffer-substring mailbuf) + (set-buffer-file-coding-system coding) (goto-char (point-max)) ;; require one newline at the end. (or (= (preceding-char) ?\n)