Mercurial > emacs
changeset 28750:4ed5e6dadc6e
(sendmail-send-it): Set
buffer-file-coding-system to the selected coding system for MIME
header.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 28 Apr 2000 04:04:04 +0000 |
parents | bdbffbf2a00e |
children | 6a79bbe8bf72 |
files | lisp/mail/sendmail.el |
diffstat | 1 files changed, 6 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/sendmail.el Fri Apr 28 04:03:09 2000 +0000 +++ b/lisp/mail/sendmail.el Fri Apr 28 04:04:04 2000 +0000 @@ -907,6 +907,12 @@ (progn (skip-chars-forward "\0-\177") (/= (point) (point-max))) (setq coding-system (select-message-coding-system)) + ;; Set buffer-file-coding-system to the selected + ;; one. This prevent the later call of + ;; select-message-coding-system asking a user + ;; again. + (prog1 t + (set-buffer-file-coding-system coding-system)) (setq charset (coding-system-get coding-system 'mime-charset)) (goto-char delimline)