* elmo-imap4.el (elmo-imap4-mark-set-on-msgs):

Clear `elmo-imap4-fetch-callback' and `elmo-imap4-fetch-callback-data'
before STORE command.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 91bfa07..d9b2679 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,9 @@
+2000-09-06  Yuuichi Teranishi  <teranisi@gohome.org>
+
+       * elmo-imap4.el (elmo-imap4-mark-set-on-msgs):
+       Clear `elmo-imap4-fetch-callback' and `elmo-imap4-fetch-callback-data'
+       before STORE command.
+
 2000-09-04  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * elmo2.el (elmo-multi-folder-diff): Fixed problem of filter folder.

diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 43915e7..50f34bf 100644 (file)
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -912,6 +912,9 @@ If optional argument UNMARK is non-nil, unmark."
                                       (elmo-imap4-spec-mailbox spec))
     (setq set-list (elmo-imap4-make-number-set-list msgs))
     (when set-list
+      (with-current-buffer (elmo-network-session-buffer session)
+       (setq elmo-imap4-fetch-callback nil)
+       (setq elmo-imap4-fetch-callback-data nil))
       (elmo-imap4-send-command-wait
        session
        (format