Added option to change the title.

lib/python/ZClasses/Basic.py

@@ -87,15 +87,18 @@
 
 import Globals, OFS.PropertySheets, OFS.Image, ExtensionClass
 from string import split, join, strip
+import Acquisition
 
 class ZClassBasicSheet(OFS.PropertySheets.PropertySheet,
                        OFS.PropertySheets.View):
     """Provide management view for item classes
     """
 
+    _getZClass=Acquisition.Acquired
+
     manage=Globals.HTMLFile('itemProp', globals())
     def manage_edit(self, meta_type='', icon='', file='',
-                    class_id=None, REQUEST=None):
+                    class_id=None, title=None, REQUEST=None):
         """Set basic item properties.
         """
         if meta_type: self.setClassAttr('meta_type', meta_type)
@@ -115,6 +118,9 @@ class ZClassBasicSheet(OFS.PropertySheets.PropertySheet,
             
         self.setClassAttr('icon', icon)
 
+        if title is not None:
+            self._getZClass().title=title
+
         if class_id is not None and class_id != self.class_id():
             self.changeClassId(class_id)
 
@@ -133,6 +139,7 @@ class ZClassBasicSheet(OFS.PropertySheets.PropertySheet,
     def class_id(self):
         return (self.getClassAttr('__module__','') or '')[1:]
 
+    def zClassTitle(self): return self._getZClass().title
 
 class ZClassViewsSheet(OFS.PropertySheets.PropertySheet,
                        OFS.PropertySheets.View):

lib/python/ZClasses/ZClass.py

@@ -514,6 +514,8 @@ class ZClass(OFS.SimpleItem.SimpleItem):
             elif hasattr(c, '__name__'): r.append(c.__name__)
 
         return r
+
+    def _getZClass(self): return self
             
 class ZClassSheets(OFS.PropertySheets.PropertySheets):
     "Manage a collection of property sheets that provide ZClass management"

lib/python/ZClasses/itemProp.dtml

@@ -17,6 +17,13 @@ will need to be adjusted if the class is moved.</p>
   <TD ALIGN="LEFT" VALIGN="TOP"><!--#var "_.string.join(ZClassBaseClassNames(), ', ')"-->
   </TD>
 </TR>
+<TR>
+  <TH ALIGN="LEFT" VALIGN="TOP">title</TH>
+  <TD ALIGN="LEFT" VALIGN="TOP">
+    <INPUT TYPE="TEXT" NAME="title" SIZE="40"
+     value="<!--#var zClassTitle-->">
+  </TD>
+</TR>
 <TR>
   <TH ALIGN="LEFT" VALIGN="TOP">meta type</TH>
   <TD ALIGN="LEFT" VALIGN="TOP">