getInterfaceTypeList for Base_view

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

product/ERP5Type/Tool/TypesTool.py

@@ -16,6 +16,7 @@
 ##############################################################################
 
 import imp, sys, warnings
+import inspect
 from itertools import chain
 import zope.interface
 from Acquisition import aq_base
@@ -201,11 +202,19 @@ class TypesTool(TypeProvider):
   security.declareProtected(Permissions.AccessContentsInformation, 'getMixinTypeList')
   def getMixinTypeList(self):
     """
-    Return a list of classes names that can be used as Mixins
+    Return a list of class names that can be used as Mixins
     """
     from Products.ERP5Type import mixin_class_registry
     return sorted(mixin_class_registry)
 
+  security.declareProtected(Permissions.AccessContentsInformation, 'getInterfaceTypeList')
+  def getInterfaceTypeList(self):
+    """
+    Return a list of class names that can be used as Interfaces
+    """
+    from Products.ERP5Type import interfaces
+    return [name for name, cls in inspect.getmembers(interfaces, inspect.isclass)]
+
   security.declareProtected(Permissions.AddPortalContent, 'listDefaultTypeInformation')
   def listDefaultTypeInformation(self):
       # FIXME: This method is only used by manage_addTypeInformation below, and