[Emacs-diffs] /srv/bzr/emacs/trunk r101347: pop3.el (pop3-streaming-movemail): Always close the pop3 connection.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 101347
author: Lars Magne Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Sun 2010-09-05 01:12:51 +0000
message:
  pop3.el (pop3-streaming-movemail): Always close the pop3 connection.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/pop3.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2010-09-05 01:08:22 +0000
+++ b/lisp/gnus/ChangeLog       2010-09-05 01:12:51 +0000
@@ -1,5 +1,7 @@
 2010-09-04  Lars Magne Ingebrigtsen  <address@hidden>
 
+       * 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.

=== modified file 'lisp/gnus/pop3.el'
--- a/lisp/gnus/pop3.el 2010-09-05 01:08:22 +0000
+++ b/lisp/gnus/pop3.el 2010-09-05 01:12:51 +0000
@@ -144,8 +144,8 @@
        (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)