aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/net/imap.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/net/imap.el b/lisp/net/imap.el
index 5c5ed868172..7e4cc72028f 100644
--- a/lisp/net/imap.el
+++ b/lisp/net/imap.el
@@ -752,8 +752,9 @@ sure of changing the value of `foo'."
752 (lambda (capabilities) 752 (lambda (capabilities)
753 (when (string-match-p "STARTTLS" capabilities) 753 (when (string-match-p "STARTTLS" capabilities)
754 "1 STARTTLS\r\n")))) 754 "1 STARTTLS\r\n"))))
755 (done (and process 755 (done (if (and process
756 (memq (process-status process) '(open run))))) 756 (memq (process-status process) '(open run)))
757 process)))
757 (message "imap: Connecting with STARTTLS...%s" (if done "done" "failed")) 758 (message "imap: Connecting with STARTTLS...%s" (if done "done" "failed"))
758 done)) 759 done))
759 760