From 8e84be45804b6980fc047cbd2f6c859aa0535736 Mon Sep 17 00:00:00 2001
From: Michael M Slusarz <slusarz@curecanti.org>
Date: Fri, 10 Sep 2010 15:29:57 -0600
Subject: [PATCH] Expire cache when upgrading IMP

---
 imp/lib/LoginTasks/SystemTask/UpgradeFromImp4.php | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/imp/lib/LoginTasks/SystemTask/UpgradeFromImp4.php b/imp/lib/LoginTasks/SystemTask/UpgradeFromImp4.php
index 205f33a96..684c348d3 100644
--- a/imp/lib/LoginTasks/SystemTask/UpgradeFromImp4.php
+++ b/imp/lib/LoginTasks/SystemTask/UpgradeFromImp4.php
@@ -27,6 +27,7 @@ class IMP_LoginTasks_SystemTask_UpgradeFromImp4 extends Horde_LoginTasks_SystemT
     public function execute()
     {
         $this->_upgradeAbookPrefs();
+        $this->_upgradeExpireImapCache();
         $this->_upgradeForwardPrefs();
         $this->_upgradeLoginTasksPrefs();
         $this->_upgradeSortPrefs();
@@ -67,6 +68,23 @@ class IMP_LoginTasks_SystemTask_UpgradeFromImp4 extends Horde_LoginTasks_SystemT
     }
 
     /**
+     * Expire existing IMAP cache.
+     */
+    protected function _upgradeExpireImapCache()
+    {
+        try {
+            $ob = $injector->getInstance('IMP_Imap')->getOb()->ob;
+            $ob->login();
+
+            $mboxes = $ob->listMailboxes('*', Horde_Imap_Client::MBOX_ALL, array('flat' => true));
+
+            foreach ($mboxes as $val) {
+                $ob->cache->deleteMailbox($val);
+            }
+        } catch (Exception $e) {}
+    }
+
+    /**
      * Upgrade to the new forward preferences.
      */
     protected function _upgradeForwardPrefs()
-- 
2.11.0