diff options
Diffstat (limited to 'lisp/mail/smtpmail.el')
| -rw-r--r-- | lisp/mail/smtpmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el index 33458178a51..10e926a2a58 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) |