From: Eli Zaretskii <eliz@gnu.org>
Date: Wed, 21 Apr 2021 12:29:49 +0000 (+0300)
Subject: ; * lisp/mail/rmailmm.el (rmail-mime-set-bulk-data): Fix last change.
X-Git-Tag: emacs-28.0.90~2795
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e2464c534e7edd303031a0885be8cdf24a86ff70;p=emacs.git

; * lisp/mail/rmailmm.el (rmail-mime-set-bulk-data): Fix last change.
---

diff --git a/lisp/mail/rmailmm.el b/lisp/mail/rmailmm.el
index 1295a086f52..99bff66657b 100644
--- a/lisp/mail/rmailmm.el
+++ b/lisp/mail/rmailmm.el
@@ -785,7 +785,7 @@ directly."
 	     (setq size (- (aref body 1) (aref body 0)))
 	     (cond ((string= encoding "base64")
                     ;; https://en.wikipedia.org/wiki/Base64#MIME
-		    (setq size (max (* (- size 814) 0.73) 100)))
+		    (setq size (* size 0.73)))
 		   ((string= encoding "quoted-printable")
                     ;; Assume most of the text is ASCII...
 		    (setq size (/ (* size 5) 7)))))))