summaryrefslogtreecommitdiff
path: root/lisp/mail/smtpmail.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mail/smtpmail.el')
-rw-r--r--lisp/mail/smtpmail.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el
index 7385eab4977..58a517ba836 100644
--- a/lisp/mail/smtpmail.el
+++ b/lisp/mail/smtpmail.el
@@ -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