mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-22 07:09:54 +00:00
Reuse already read `capabilities'
* lisp/mail/smtpmail.el (smtpmail-via-smtp): Reuse already read `capabilities'. (Bug#72544)
This commit is contained in:
parent
944e45db53
commit
24b7f810d8
@ -800,11 +800,7 @@ Returns an error if the server cannot be contacted."
|
||||
(smtpmail-command-or-throw
|
||||
process (format "HELO %s" (smtpmail-fqdn)))
|
||||
;; EHLO was successful, so we parse the extensions.
|
||||
(dolist (line (delete
|
||||
""
|
||||
(split-string
|
||||
(plist-get (cdr result) :capabilities)
|
||||
"\r\n")))
|
||||
(dolist (line (delete "" (split-string capabilities "\r\n")))
|
||||
(let ((name
|
||||
;; Use ASCII case-table to prevent I
|
||||
;; downcasing to a dotless i under some
|
||||
|
Loading…
Reference in New Issue
Block a user