Add an optional parameter keep into manageClearActivities.

git-svn-id: https://svn.erp5.org/repos/public/erp5/trunk@4882 20353a03-c40f-0410-a6d1-a30d3c3de9de

product/CMFActivity/ActivityTool.py

@@ -685,7 +685,7 @@ class ActivityTool (Folder, UniqueObject):
         return REQUEST.RESPONSE.redirect('%s/%s' % (self.absolute_url(), 'manageActivities'))
 
     security.declareProtected( CMFCorePermissions.ManagePortal, 'manageClearActivities' )
-    def manageClearActivities(self, REQUEST=None):
+    def manageClearActivities(self, keep=1, REQUEST=None):
       """
         Clear all activities and recreate tables.
       """
@@ -693,6 +693,7 @@ class ActivityTool (Folder, UniqueObject):
 
       # Obtain all pending messages.
       message_list = []
+      if keep:
         for activity in activity_list:
           if hasattr(activity, 'dumpMessageList'):
             try: