diff options
author | Richard M. Stallman <[email protected]> | 2002-09-23 00:17:51 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 2002-09-23 00:17:51 +0000 |
commit | c86237b26e214f8fc651298e8fe405cde658aeb0 (patch) | |
tree | c93a268b6746e3cd9fad496db14b0835129b3828 /lisp/mail | |
parent | 292ffc15564ef7a1e869b7735804794c5a347f45 (diff) |
(sendmail-send-it): If user's buffer is unibyte, make tembuf unibyte.
Diffstat (limited to 'lisp/mail')
-rw-r--r-- | lisp/mail/sendmail.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 7be8c97376..aefe64cc65 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -806,6 +806,7 @@ external program defined by `sendmail-program'." (generate-new-buffer " sendmail errors") 0)) (tembuf (generate-new-buffer " sendmail temp")) + (multibyte enable-multibyte-characters) (case-fold-search nil) (coding (and (local-variable-p 'buffer-file-coding-system) buffer-file-coding-system)) @@ -826,6 +827,8 @@ external program defined by `sendmail-program'." (save-excursion (set-buffer tembuf) (erase-buffer) + (unless multibyte + (set-buffer-multibyte nil)) (insert-buffer-substring mailbuf) (set-buffer-file-coding-system coding) (goto-char (point-max)) |