From 42d305db926aaf8525bcc7624d2f50eeafd4ebc2 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Mon, 10 Sep 2001 09:37:02 +0000 Subject: [PATCH] (mail-send): Obey mail-send-nonascii when enable-multibyte-characters = nil. From Hallvard B Furuseth . --- lisp/ChangeLog | 6 ++++++ lisp/mail/sendmail.el | 3 +-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 78e55abd491..3701e88ae09 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2001-09-10 Gerd Moellmann + + * mail/sendmail.el (mail-send): Obey mail-send-nonascii when + enable-multibyte-characters = nil. From Hallvard B Furuseth + . + 2001-09-09 Michael Kifer * ediff-init.el (ediff-highest-priority): bug fix. diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 05d05d6074c..3826a1bac92 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -730,8 +730,7 @@ the user from the mailer." (y-or-n-p "Message already sent; resend? "))) (let ((inhibit-read-only t) (opoint (point))) - (when (and enable-multibyte-characters - (not (memq mail-send-nonascii '(t mime)))) + (unless (memq mail-send-nonascii '(t mime)) (goto-char (point-min)) (skip-chars-forward "\0-\177") (or (= (point) (point-max)) -- 2.39.5