procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(smtpmail-via-smtp): Query the user for password if we get errors 550 to 554.

Browse source
This commit is contained in:
Lars Magne Ingebrigtsen 2011-07-17 02:45:56 +02:00
parent 64a465b2d9
commit 4e190b801d
2 changed files with 10 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2011-07-17 Lars Magne Ingebrigtsen <larsi@gnus.org>
* mail/smtpmail.el (smtpmail-via-smtp): Query the user for
password if we get errors 550 to 554.
2011-07-16 Lars Magne Ingebrigtsen <larsi@gnus.org>
* net/gnutls.el (gnutls-log-level): Removed.

9
lisp/mail/smtpmail.el
View file

@ -788,10 +788,11 @@ The list is in preference order.")
nil)
((and auth-mechanisms
(not ask-for-password)
(= (car result) 550))
;; We got a "550 relay not permitted", and the server
;; accepts credentials, so we try again, but ask for a
;; password first.
(>= (car result) 550)
(<= (car result) 554))
;; We got a "550 relay not permitted" (or the like),
;; and the server accepts credentials, so we try
;; again, but ask for a password first.
(smtpmail-send-command process "QUIT")
(smtpmail-read-response process)
(delete-process process)