From 0db2101ccc890ecb1e6540f5e7d77d7c41b84e91 Mon Sep 17 00:00:00 2001 From: Simon Josefsson Date: Sat, 20 Sep 2003 23:07:29 +0000 Subject: [PATCH] (imap-starttls-open): Quick hack to fix last commit. Still not perfect, APPEND doesn't work with gnutls starttls.el. --- lisp/imap.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/imap.el b/lisp/imap.el index 74c93c146..1c3ca8ce2 100644 --- a/lisp/imap.el +++ b/lisp/imap.el @@ -762,6 +762,8 @@ sure of changing the value of `foo'." (not (imap-parse-greeting))) (accept-process-output process 1) (sit-for 1)) + (if (symbolp (symbol-function 'starttls-negotiate)) + (setq imap-client-eol "\n")) (imap-send-command "STARTTLS") (while (and (memq (process-status process) '(open run)) (set-buffer buffer) ;; XXX "blue moon" nntp.el bug -- 2.34.1