From 7527d65203ad6533d8b2ec786dd5607628244520 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 1 Jun 2000 22:20:30 +0000 Subject: [PATCH] Sync with Gnus. --- lisp/ChangeLog | 5 +++++ lisp/mm-bodies.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 65faf35..d3837a7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-06-01 Florian Weimer + + * mm-bodies.el (mm-body-encoding): Always encoded if + `mm-use-ultra-safe-encoding' is set. + 2000-05-31 14:50:52 Shenghuo ZHU * mml.el (ange-ftp-name-format): Typo. diff --git a/lisp/mm-bodies.el b/lisp/mm-bodies.el index b2b46f1..410d9f8 100644 --- a/lisp/mm-bodies.el +++ b/lisp/mm-bodies.el @@ -108,7 +108,7 @@ If no encoding was done, nil is returned." "Do Content-Transfer-Encoding and return the encoding of the current buffer." (let ((bits (mm-body-7-or-8))) (cond - ((eq bits '7bit) + ((and (not mm-use-ultra-safe-encoding) (eq bits '7bit)) bits) ((and (not mm-use-ultra-safe-encoding) (or (eq t (cdr message-posting-charset)) -- 1.7.10.4