From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 12 Jul 2019 23:31:12 +0000 (+0200)
Subject: Fix long credentials when using auth in nnimap.el
X-Git-Tag: emacs-27.0.90~1980
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=99e8d6fc26a163001c3a7ccf6786e1c4ecc5788e;p=emacs.git

Fix long credentials when using auth in nnimap.el

* lisp/gnus/nnimap.el (nnimap-login): When base64-ing
credentials, don't let bsae64-encode-string split the result into
several lines, because servers do not understand that (bug#34458).
---

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 9e52abc1ca7..06817f452d2 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -570,7 +570,8 @@ textual parts.")
 	(base64-encode-string
 	 (concat user " "
 		 (rfc2104-hash 'md5 64 16 password
-			       (base64-decode-string challenge))))
+			       (base64-decode-string challenge)))
+	 t)
 	"\r\n"))
       (nnimap-wait-for-response sequence)))
    ((and (not (nnimap-capability "LOGINDISABLED"))
@@ -586,7 +587,8 @@ textual parts.")
      (base64-encode-string
       (format "\000%s\000%s"
 	      (nnimap-quote-specials user)
-	      (nnimap-quote-specials password)))))))
+	      (nnimap-quote-specials password))
+      t)))))
 
 (defun nnimap-quote-specials (string)
   (with-temp-buffer