emacs-28 ba64d09156: Treat smtp-auth method from auth-info as a symbol

[Robert Pluim]

branch: emacs-28
commit ba64d091568f67bb648ad2d8cde61c7cf6fabf8e
Author: Robert Pluim <rpluim@gmail.com>
Commit: Robert Pluim <rpluim@gmail.com>

    Treat smtp-auth method from auth-info as a symbol
    
    The lookup of the SMTP auth method is done based on symbols, but
    sometimes the requested value comes from `auth-info', in which case it
    is a string, so call `intern-soft' to convert it to a symbol (which
    does nothing if it's already a symbol).
    
    * lisp/mail/smtpmail.el (smtpmail-try-auth-methods): Call
    `intern-soft' on the smtp-auth key's value.  (Bug#57373)
    
    Do not merge to master
---
 lisp/mail/smtpmail.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 33458178a5..10e926a2a5 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -578,7 +578,7 @@ for `smtpmail-try-auth-method'.")
       (setq password (funcall password)))
     (let ((result (catch 'done
                     (if (and mech user password)
-                       (smtpmail-try-auth-method process mech user password)
+                       (smtpmail-try-auth-method process (intern-soft mech) 
user password)
                       ;; No mechanism, or no credentials.
                       mech))))
       (if (stringp result)