From 2478090023fe8c429ca56763fa4418448525a6da Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A9rome=20Perrin?= <jerome@nexedi.com>
Date: Thu, 29 Dec 2005 13:54:25 +0000
Subject: [PATCH] make sure the propery sheet can be imported
git-svn-id: https://svn.erp5.org/repos/public/erp5/trunk@4939 20353a03-c40f-0410-a6d1-a30d3c3de9de
---
product/ERP5Form/PreferenceTool.py | 15 +++++++++++----
1 file changed, 11 insertions(+), 4 deletions(-)
diff --git a/product/ERP5Form/PreferenceTool.py b/product/ERP5Form/PreferenceTool.py
index 52e2031f30..1e68d4f3b7 100755
--- a/product/ERP5Form/PreferenceTool.py
+++ b/product/ERP5Form/PreferenceTool.py
@@ -29,6 +29,7 @@
from AccessControl import ClassSecurityInfo, getSecurityManager
from Globals import InitializeClass, DTMLFile
from Acquisition import aq_base
+from zLOG import LOG, INFO
from Products.CMFCore.utils import getToolByName
from Products.ERP5Type.Tool.BaseTool import BaseTool
@@ -125,12 +126,17 @@ class PreferenceTool(BaseTool):
# type is not installed yet
return []
# 'Dynamic' property sheets added through ZMI
- zmi_property_sheet_list = tuple(map(lambda property_sheet:
- getattr(__import__(property_sheet), property_sheet),
- pref_portal_type.property_sheet_list))
+ zmi_property_sheet_list = []
+ for property_sheet in pref_portal_type.property_sheet_list :
+ try:
+ zmi_property_sheet_list.append(
+ getattr(__import__(property_sheet), property_sheet))
+ except ImportError, e :
+ LOG('PreferenceTool._getValidPreferenceNames', INFO,
+ 'unable to import Property Sheet %s' % property_sheet, e)
# 'Static' property sheets defined on the class
class_property_sheet_list = Preference.property_sheets
- for property_sheet in ( zmi_property_sheet_list +
+ for property_sheet in ( tuple(zmi_property_sheet_list) +
class_property_sheet_list ) :
# then generate common method names
for prop in property_sheet._properties :
@@ -149,6 +155,7 @@ class PreferenceTool(BaseTool):
'get%s' % convertToUpperCase(attribute),
'get%sId' % convertToUpperCase(attribute),
'get%sTitle' % convertToUpperCase(attribute),
+
'get%sValue' % convertToUpperCase(attribute),
'get%sValueList' % convertToUpperCase(attribute),
'get%sItemList' % convertToUpperCase(attribute),
--
2.30.9