From 649d66e3139a17ef1e542b90f7a46d64e550456f Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 22 May 2000 22:40:09 +0000
Subject: [PATCH] Fix bug: don't signal an error when reading BYE message.

---
 v7/src/imail/imail-imap.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/imail/imail-imap.scm b/v7/src/imail/imail-imap.scm
index dd0d3f058..19cc79f86 100644
--- a/v7/src/imail/imail-imap.scm
+++ b/v7/src/imail/imail-imap.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: imail-imap.scm,v 1.77 2000/05/22 20:50:37 cph Exp $
+;;; $Id: imail-imap.scm,v 1.78 2000/05/22 22:40:09 cph Exp $
 ;;;
 ;;; Copyright (c) 1999-2000 Massachusetts Institute of Technology
 ;;;
@@ -1123,7 +1123,7 @@
 	   (if code
 	       (process-response-text connection command code text))
 	   (if (and (imap:response:bye? response)
-		    (not (eq? command 'LOGOUT)))
+		    (not (memq command '(LOGOUT #F))))
 	       (begin
 		 (close-imap-connection connection)
 		 (error "Server shut down connection:" text)))
-- 
2.25.1