From c86237b26e214f8fc651298e8fe405cde658aeb0 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 23 Sep 2002 00:17:51 +0000 Subject: [PATCH] (sendmail-send-it): If user's buffer is unibyte, make tembuf unibyte. --- lisp/mail/sendmail.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 7be8c973762..aefe64cc656 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)) -- 2.39.2