(mm-qp-or-base64): Don't base64 for the sake of a

single character.

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/gnus/mm-encode.el b/lisp/gnus/mm-encode.el
index c2dee51ce51..65fc34acfd7 100644
--- a/lisp/gnus/mm-encode.el
+++ b/lisp/gnus/mm-encode.el
@@ -162,7 +162,10 @@ The encoding used is returned."
         (incf n8bit)
         (forward-char 1)
         (skip-chars-forward "\x20-\x7f\r\n\t" limit))
-      (if (< (* 6 n8bit) (- limit (point-min)))
+      (if (or (< (* 6 n8bit) (- limit (point-min)))
+              ;; Don't base64, say, a short line with a single
+              ;; non-ASCII char when splitting parts by charset.
+              (= n8bit 1))
           'quoted-printable
         'base64))))