From 56e522e64aabe0ef760137cd102316e473a0d8fd Mon Sep 17 00:00:00 2001
From: Vincent Pelletier <vincent@nexedi.com>
Date: Fri, 7 Dec 2007 13:58:08 +0000
Subject: [PATCH] Make cache flush method overridable. Add a unit test based on
 testWorklist to check SQL-cached worklists.

git-svn-id: https://svn.erp5.org/repos/public/erp5/trunk@18123 20353a03-c40f-0410-a6d1-a30d3c3de9de
---
 product/ERP5/tests/testSQLCachedWorklist.py | 47 +++++++++++++++++++++
 product/ERP5/tests/testWorklist.py          |  9 ++--
 2 files changed, 53 insertions(+), 3 deletions(-)
 create mode 100644 product/ERP5/tests/testSQLCachedWorklist.py

diff --git a/product/ERP5/tests/testSQLCachedWorklist.py b/product/ERP5/tests/testSQLCachedWorklist.py
new file mode 100644
index 0000000000..619f703db8
--- /dev/null
+++ b/product/ERP5/tests/testSQLCachedWorklist.py
@@ -0,0 +1,47 @@
+##############################################################################
+#
+# Copyright (c) 2007 Nexedi SA and Contributors. 
+# All Rights Reserved.
+#          Vincent Pelletier <vincent@nexedi.com>
+#
+# WARNING: This program as such is intended to be used by professional
+# programmers who take the whole responsability of assessing all potential
+# consequences resulting from its eventual inadequacies and bugs
+# End users who are looking for a ready-to-use solution with commercial
+# garantees and support are strongly adviced to contract a Free Software
+# Service Company
+#
+# This program is Free Software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+#
+##############################################################################
+
+import unittest
+from Products.ERP5.tests.testWorklist import TestWorklist
+
+class TestSQLCachedWorklist(TestWorklist):
+  def getBusinessTemplateList(self):
+    """
+    Return list of bt5 to install
+    """
+    return TestWorklist.getBusinessTemplateList(self) + ('erp5_worklist_sql', )
+
+  def clearCache(self):
+    TestWorklist.clearCache(self)
+    self.portal.portal_workflow.refreshWorklistCache()
+
+def test_suite():
+  suite = unittest.TestSuite()
+  suite.addTest(unittest.makeSuite(TestSQLCachedWorklist))
+  return suite
diff --git a/product/ERP5/tests/testWorklist.py b/product/ERP5/tests/testWorklist.py
index 11942d2c51..d8d7183f35 100644
--- a/product/ERP5/tests/testWorklist.py
+++ b/product/ERP5/tests/testWorklist.py
@@ -151,6 +151,9 @@ class TestWorklist(ERP5TypeTestCase):
           props={'guard_roles': role,
                  'var_match_portal_type': self.checked_portal_type})
 
+  def clearCache(self):
+    self.portal.portal_caches.clearAllCache()
+
   def test_01_worklist(self, quiet=0, run=run_all_test):
     """
     Test the permission of the building module.
@@ -170,7 +173,7 @@ class TestWorklist(ERP5TypeTestCase):
 
     get_transaction().commit()
     self.tic()
-    self.portal.portal_caches.clearAllCache()
+    self.clearCache()
 
     result = workflow_tool.listActions(object=document)
     self.logout()
@@ -206,7 +209,7 @@ class TestWorklist(ERP5TypeTestCase):
     document.reindexObject()
     get_transaction().commit()
     self.tic()
-    self.portal.portal_caches.clearAllCache()
+    self.clearCache()
     self.logout()
 
     for user_id in ('manager', ):
@@ -267,7 +270,7 @@ class TestWorklist(ERP5TypeTestCase):
     document.reindexObject()
     get_transaction().commit()
     self.tic()
-    self.portal.portal_caches.clearAllCache()
+    self.clearCache()
     self.logout()
 
     # Users can not see worklist as they are not Assignor
-- 
2.30.9