aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2019-07-13 01:31:12 +0200
committerLars Ingebrigtsen2019-07-13 01:31:24 +0200
commit99e8d6fc26a163001c3a7ccf6786e1c4ecc5788e (patch)
tree6528230aef1117ceb4c2ddb22ffbeda1f420e525
parent655fe3fe0de92ace4a97dd3c478c3683b163e132 (diff)
downloademacs-99e8d6fc26a163001c3a7ccf6786e1c4ecc5788e.tar.gz
emacs-99e8d6fc26a163001c3a7ccf6786e1c4ecc5788e.zip
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).
-rw-r--r--lisp/gnus/nnimap.el6
1 files changed, 4 insertions, 2 deletions
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.")
570 (base64-encode-string 570 (base64-encode-string
571 (concat user " " 571 (concat user " "
572 (rfc2104-hash 'md5 64 16 password 572 (rfc2104-hash 'md5 64 16 password
573 (base64-decode-string challenge)))) 573 (base64-decode-string challenge)))
574 t)
574 "\r\n")) 575 "\r\n"))
575 (nnimap-wait-for-response sequence))) 576 (nnimap-wait-for-response sequence)))
576 ((and (not (nnimap-capability "LOGINDISABLED")) 577 ((and (not (nnimap-capability "LOGINDISABLED"))
@@ -586,7 +587,8 @@ textual parts.")
586 (base64-encode-string 587 (base64-encode-string
587 (format "\000%s\000%s" 588 (format "\000%s\000%s"
588 (nnimap-quote-specials user) 589 (nnimap-quote-specials user)
589 (nnimap-quote-specials password))))))) 590 (nnimap-quote-specials password))
591 t)))))
590 592
591(defun nnimap-quote-specials (string) 593(defun nnimap-quote-specials (string)
592 (with-temp-buffer 594 (with-temp-buffer