Commit 396f7c9d authored by Lars Magne Ingebrigtsen's avatar Lars Magne Ingebrigtsen
Browse files

(smtpmail-via-smtp): Make sure we don't send QUIT twice.

parent 8998d1b3
2011-06-22 Lars Magne Ingebrigtsen <larsi@gnus.org>
* mail/smtpmail.el (smtpmail-via-smtp): Make sure we don't send
QUIT twice.
2011-06-22 Martin Rudalics <rudalics@gmx.at>
* window.el (display-buffer-default-specifiers)
......
......@@ -741,6 +741,7 @@ The list is in preference order.")
(smtpmail-send-command process "QUIT")
(smtpmail-read-response process)
(delete-process process)
(setq process nil)
(throw 'done
(smtpmail-via-smtp recipient smtpmail-text-buffer t)))
(t
......@@ -768,6 +769,7 @@ The list is in preference order.")
(smtpmail-send-command process "QUIT")
(smtpmail-read-response process)
(delete-process process)
(setq process nil)
(throw 'done
(smtpmail-via-smtp recipient smtpmail-text-buffer t)))
(t
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment