From ff3eb82e0e0dfaf6976b0788eb2195b7be843226 Mon Sep 17 00:00:00 2001 From: Lars Magne Ingebrigtsen Date: Sun, 5 Sep 2010 01:12:51 +0000 Subject: [PATCH] pop3.el (pop3-streaming-movemail): Always close the pop3 connection. --- lisp/gnus/ChangeLog | 2 ++ lisp/gnus/pop3.el | 4 ++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 5bd02f73bbf..a4115615452 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,7 @@ 2010-09-04 Lars Magne Ingebrigtsen + * pop3.el (pop3-streaming-movemail): Always close the pop3 connection. + * mail-source.el (mail-source-delete-crash-box): Only check the incoming files for deletion once per day to save a lot of file accesses. diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index ca92046f1a8..51c2f1ae987 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el @@ -144,8 +144,8 @@ Use streaming commands." (pop3-write-to-file file) (unless pop3-leave-mail-on-server (pop3-send-streaming-command - process "DELE" message-count nil)) - (pop3-quit process))))) + process "DELE" message-count nil)))) + (pop3-quit process))) (defun pop3-send-streaming-command (process command count total-size) (erase-buffer) -- 2.39.2