From f13bbc692422e637d03601fee162b50ef7abcc6f Mon Sep 17 00:00:00 2001 From: Simon Josefsson Date: Thu, 7 Sep 2000 21:17:19 +0000 Subject: [PATCH] (imap-kerberos4-open): Erase more (fixes race condition?). --- lisp/ChangeLog | 4 ++++ lisp/imap.el | 1 + 2 files changed, 5 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b7c933891..01e720e86 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2000-09-08 Simon Josefsson + + * imap.el (imap-kerberos4-open): Erase more (fixes race condition?). + 2000-09-08 David Edmondson * gnus.el (gnus-short-group-name): Guess separator. diff --git a/lisp/imap.el b/lisp/imap.el index 29213c186..e652f402c 100644 --- a/lisp/imap.el +++ b/lisp/imap.el @@ -435,6 +435,7 @@ If ARGS, PROMPT is used as an argument to `format'." cmd done) (while (and (not done) (setq cmd (pop cmds))) (message "Opening Kerberos 4 IMAP connection with `%s'..." cmd) + (erase-buffer) (let* ((port (or port imap-default-port)) (coding-system-for-read imap-coding-system-for-read) (coding-system-for-write imap-coding-system-for-write) -- 2.34.1