2001-11-06 18:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* mail-source.el (mail-source-fetch-imap): ASYNC param.
	From: <andre@slamdunknetworks.com>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0887ab4..77e55be 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-11-06 18:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * mail-source.el (mail-source-fetch-imap): ASYNC param.
+       From: <andre@slamdunknetworks.com>
+       
 2001-11-06 10:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * many files: Fix copyright lines.

diff --git a/lisp/mail-source.el b/lisp/mail-source.el
index c3713df..7058110 100644 (file)
--- a/lisp/mail-source.el
+++ b/lisp/mail-source.el
@@ -932,7 +932,7 @@ This only works when `display-time' is enabled."
               fetchflag nil buf))
            (if dontexpunge
                (imap-mailbox-unselect buf)
-             (imap-mailbox-close buf))
+             (imap-mailbox-close nil buf))
            (imap-close buf))
        (imap-close buf)
        ;; We nix out the password in case the error