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

diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 33458178a51ca35a7a9b918a5c230e22146a49a2..10e926a2a5840c4475f82e37c0f4ab829aff51af 100644 (file)
--- 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)