From 702f91d8fca69436b5953dc66a357ddd1bbfcf0a Mon Sep 17 00:00:00 2001 From: ueno Date: Tue, 5 Sep 2000 06:02:01 +0000 Subject: [PATCH] (pop3-quit): Don't clear `pop3-uidl-obarray'. --- ChangeLog | 3 ++- lisp/pop3.el | 9 +-------- 2 files changed, 3 insertions(+), 9 deletions(-) diff --git a/ChangeLog b/ChangeLog index 890bed5..ca83e6a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,6 +1,7 @@ 2000-09-05 Daiki Ueno - * lisp/pop3.el (pop3-save-uidls): Clear `pop3-uidl-obarray'. + * lisp/pop3.el (pop3-quit): Don't clear `pop3-uidl-obarray'. + (pop3-save-uidls): Clear `pop3-uidl-obarray' here. 2000-09-04 Daiki Ueno diff --git a/lisp/pop3.el b/lisp/pop3.el index 4f2d2d9..ae48589 100644 --- a/lisp/pop3.el +++ b/lisp/pop3.el @@ -545,14 +545,7 @@ and close the connection." (save-excursion (set-buffer (process-buffer process)) (goto-char (point-max)) - (delete-process process) - )) - (when pop3-leave-mail-on-server - (mapatoms - (lambda (atom) - (when (car (symbol-value atom)) - (unintern atom pop3-uidl-obarray))) - pop3-uidl-obarray))) + (delete-process process)))) (defun pop3-uidl (process &optional msgno) "Return the results of a UIDL command in PROCESS for optional MSGNO. -- 1.7.10.4