2000-09-05 Daiki Ueno <ueno@unixuser.org>
- * 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 <ueno@unixuser.org>
(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.