Add PreferenceToolType for Preference Tool Type portal type (used by

Preference Tool portal types) and PreferenceType for Preference Type
portal type (used by Preference and System Preference portal
types).

This allows to define properly the property sheet lists for
*Preference* portal types.



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

product/ERP5Form/Document/PreferenceToolType.py

+##############################################################################
+#
+# Copyright (c) 2011 Nexedi SARL and Contributors. All Rights Reserved.
+#                    Arnaud Fontaine <arnaud.fontaine@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.
+#
+##############################################################################
+
+from Products.ERP5Form.Document.PreferenceType import PreferenceType
+from AccessControl import ClassSecurityInfo
+from Products.ERP5Type import Permissions
+
+class PreferenceToolType(PreferenceType):
+  """
+  Preference Tool also define its specific accessor holders
+  """
+  portal_type = 'Preference Tool Type'
+  meta_type = 'ERP5 Preference Tool Type'
+
+  security = ClassSecurityInfo()
+  security.declareObjectProtected(Permissions.AccessContentsInformation)

product/ERP5Form/Document/PreferenceType.py

+##############################################################################
+#
+# Copyright (c) 2011 Nexedi SARL and Contributors. All Rights Reserved.
+#                    Arnaud Fontaine <arnaud.fontaine@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.
+#
+##############################################################################
+
+from Products.ERP5Type.ERP5Type import ERP5TypeInformation
+from AccessControl import ClassSecurityInfo
+from Products.ERP5Type import Permissions
+
+class PreferenceType(ERP5TypeInformation):
+  """
+  Preference, System Preference and Preference Tool portal types are
+  Preference Type, necessary to define custom behavior for these
+  portal types, such as Property Sheets
+  """
+  portal_type = 'Preference Type'
+  meta_type = 'ERP5 Preference Type'
+
+  security = ClassSecurityInfo()
+  security.declareObjectProtected(Permissions.AccessContentsInformation)
+
+  def getTypePropertySheetList(self):
+    """
+    Preference and System Preference get all the Property Sheets
+    ending by 'Preference' applied automatically
+    """
+    property_sheet_tool = getattr(self.getPortalObject(),
+                                  'portal_property_sheets',
+                                  None)
+
+    if property_sheet_tool is None:
+      return
+
+    existing_property_sheet_name_set = set(property_sheet_tool.objectIds())
+    property_sheet_name_list = []
+
+    for property_sheet_name in existing_property_sheet_name_set:
+      if property_sheet_name.endswith('Preference'):
+        property_sheet_name_list.append(property_sheet_name)
+
+    return property_sheet_name_list

product/ERP5Type/dynamic/portal_type_class.py

@@ -298,15 +298,18 @@ def generatePortalTypeClass(site, portal_type_name):
         except AttributeError:
           pass
 
-    # XXX maybe this should be a generic hook, adding property sheets
-    # dynamically for a given portal type name? If done well, this
-    # system could perhaps help erp5_egov to get rid of aq_dynamic
+    # Only kept for backward-compatibility as Preference and System
+    # Preference have Preference Type as portal type, which define
+    # getTypePropertySheetList properly and, likewise, Preference Tool
+    # has Preference Tool Type as its portal type
     if portal_type_name in ("Preference Tool",
                             "Preference",
                             "System Preference"):
-      for property_sheet in zodb_property_sheet_name_set:
-        if property_sheet.endswith('Preference'):
-          property_sheet_name_set.add(property_sheet)
+       if portal_type is None or \
+          not portal_type.getPortalType().startswith(portal_type_name):
+         for property_sheet in zodb_property_sheet_name_set:
+           if property_sheet.endswith('Preference'):
+             property_sheet_name_set.add(property_sheet)
 
     # Get the Property Sheets defined on the document and its bases
     # recursively