aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mail
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>2002-09-23 00:17:51 +0000
committerRichard M. Stallman <[email protected]>2002-09-23 00:17:51 +0000
commitc86237b26e214f8fc651298e8fe405cde658aeb0 (patch)
treec93a268b6746e3cd9fad496db14b0835129b3828 /lisp/mail
parent292ffc15564ef7a1e869b7735804794c5a347f45 (diff)
(sendmail-send-it): If user's buffer is unibyte, make tembuf unibyte.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/sendmail.el3
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))