diff options
Diffstat (limited to 'lisp/net/imap.el')
| -rw-r--r-- | lisp/net/imap.el | 5 |
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'." (lambda (capabilities) (when (string-match-p "STARTTLS" capabilities) "1 STARTTLS\r\n")))) - (done (and process - (memq (process-status process) '(open run))))) + (done (if (and process + (memq (process-status process) '(open run))) + process))) (message "imap: Connecting with STARTTLS...%s" (if done "done" "failed")) done)) |