From: teranisi <teranisi>
Date: Thu, 24 Jul 2003 11:55:48 +0000 (+0000)
Subject: 2002-05-05  David Smith <ultrasoul@ultrasoul.com>
X-Git-Tag: wl-2_11_5~40
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=56512725ad5f6327fd9c4e28e2e45a545f366e6f;p=elisp%2Fwanderlust.git

2002-05-05  David Smith <ultrasoul@ultrasoul.com>

	* elmo-imap4.el (elmo-imap4-folder-diff-plugged):
	Use SELECT when	elmo-imap4-use-select-to-update-status is t.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index d55b657..ca3d9b6 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2002-05-05  David Smith <ultrasoul@ultrasoul.com>
+
+	* elmo-imap4.el (elmo-imap4-folder-diff-plugged): 
+	Use SELECT when	elmo-imap4-use-select-to-update-status is t.
+
 2003-07-24  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* elmo.el (elmo-generic-folder-append-messages): Fixed last change.
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 3ab05a3..4dcddb3 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -2370,6 +2370,10 @@ If optional argument REMOVE is non-nil, remove FLAG."
     (with-current-buffer (elmo-network-session-buffer session)
       (setq elmo-imap4-status-callback nil)
       (setq elmo-imap4-status-callback-data nil))
+    (if elmo-imap4-use-select-to-update-status
+	(elmo-imap4-session-select-mailbox
+	 session
+	 (elmo-imap4-folder-mailbox-internal folder)))
     (setq response
 	  (elmo-imap4-send-command-wait session
 					(list