Index: openacs-4/packages/acs-object-management/www/admin/attribute.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/attribute.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-object-management/www/admin/attribute.tcl	28 Jul 2009 23:35:09 -0000	1.1
+++ openacs-4/packages/acs-object-management/www/admin/attribute.tcl	14 Aug 2009 22:15:42 -0000	1.2
@@ -5,8 +5,8 @@
     @cvs-id $Id$
 
 } {
-    {attribute_id:optional}
-    {object_type:notnull,sql_identifier}
+    attribute_id:optional
+    object_type:notnull,sql_identifier
 }
 
 object_type::get -object_type $object_type -array type_info
Index: openacs-4/packages/acs-object-management/www/admin/dtype-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/Attic/dtype-add.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-object-management/www/admin/dtype-add.tcl	28 Jul 2009 23:35:09 -0000	1.1
+++ openacs-4/packages/acs-object-management/www/admin/dtype-add.tcl	14 Aug 2009 22:15:42 -0000	1.2
@@ -5,7 +5,6 @@
     @creation-date 2009-07-20
 
     Modified from dynamic types.
-} {
 }
 
 set page_title [_ acs-object-management.create_type]
Index: openacs-4/packages/acs-object-management/www/admin/dtype.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/Attic/dtype.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-object-management/www/admin/dtype.adp	28 Jul 2009 23:35:09 -0000	1.1
+++ openacs-4/packages/acs-object-management/www/admin/dtype.adp	14 Aug 2009 22:15:42 -0000	1.2
@@ -2,11 +2,10 @@
 <property name="title">@page_title@</property>
 <property name="context">@context@</property>
 
-<h1>#acs-object-management.attributes#</h1>
-<h2>#acs-object-management.object_type#: @type_info.pretty_name@</h2>
+<h1>#acs-object-management.object_type#: @type_info.pretty_name@</h1>
 <listtemplate name="attributes"></listtemplate>
-<h2>#acs-object-management.inherited_attributes#</h2>
+<br>
 <listtemplate name="inherited_attributes"></listtemplate>
-<h2>#acs-object-management.views#</h2>
+<br>
 <listtemplate name="views"></listtemplate>
 
Index: openacs-4/packages/acs-object-management/www/admin/dtype.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/Attic/dtype.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-object-management/www/admin/dtype.tcl	13 Aug 2009 00:15:05 -0000	1.2
+++ openacs-4/packages/acs-object-management/www/admin/dtype.tcl	14 Aug 2009 22:15:42 -0000	1.3
@@ -5,7 +5,7 @@
     @cvs-id $Id$
 
 } {
-    {object_type:notnull,sql_identifier}
+    object_type:notnull,sql_identifier
 }
 
 object_type::get -object_type $object_type -array type_info
@@ -15,6 +15,7 @@
 
 list::create \
     -name attributes \
+    -caption [_ acs-object-management.attributes] \
     -multirow attributes \
     -key attribute_id \
     -pass_properties {
@@ -50,6 +51,7 @@
 
 list::create \
     -name inherited_attributes \
+    -caption [_ acs-object-management.inherited_attributes] \
     -multirow inherited_attributes \
     -key attribute_id \
     -elements {
@@ -74,6 +76,7 @@
 
 list::create \
     -name views \
+    -caption [_ acs-object-management.views] \
     -multirow views \
     -key object_view \
     -actions [list "[_ acs-object-management.add_view]" [export_vars -base view-add {object_type}] "[_ acs-object-management.add_view]"] \
Index: openacs-4/packages/acs-object-management/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/index.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-object-management/www/admin/index.tcl	13 Aug 2009 00:15:05 -0000	1.2
+++ openacs-4/packages/acs-object-management/www/admin/index.tcl	14 Aug 2009 22:15:42 -0000	1.3
@@ -15,6 +15,7 @@
 
 list::create \
     -name dtypes \
+    -caption $page_title \
     -multirow dtypes \
     -key object_type \
     -actions [list "[_ acs-object-management.add_type]" [export_vars -base dtype-add] "[_ acs-object-management.add_type]"] \
Index: openacs-4/packages/acs-object-management/www/admin/view.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/view.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-object-management/www/admin/view.adp	13 Aug 2009 00:15:05 -0000	1.1
+++ openacs-4/packages/acs-object-management/www/admin/view.adp	14 Aug 2009 22:15:42 -0000	1.2
@@ -2,8 +2,7 @@
 <property name="title">@page_title@</property>
 <property name="context">@context@</property>
 
-<h1>#acs-object-management.view_attributes#</h1>
-<h2>#acs-object-management.object_view#: @view_info.pretty_name@</h2>
+<h1>#acs-object-management.object_view#: @view_info.pretty_name@</h1>
 <listtemplate name="view_attributes"></listtemplate>
-<h2>#acs-object-management.available_attributes#</h2>
+<br>
 <listtemplate name="available_attributes"></listtemplate>
Index: openacs-4/packages/acs-object-management/www/admin/view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-object-management/www/admin/view.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-object-management/www/admin/view.tcl	13 Aug 2009 00:15:05 -0000	1.1
+++ openacs-4/packages/acs-object-management/www/admin/view.tcl	14 Aug 2009 22:15:42 -0000	1.2
@@ -5,7 +5,7 @@
     @cvs-id $Id$
 
 } {
-    {object_view:notnull,sql_identifier}
+    object_view:notnull,sql_identifier
 }
 
 object_type::view::get -object_view $object_view -array view_info
@@ -20,6 +20,7 @@
 
 list::create \
     -name view_attributes \
+    -caption [_ acs-object-management.view_attributes] \
     -multirow view_attributes \
     -key attribute_id \
     -pass_properties {
@@ -57,6 +58,7 @@
 
 list::create \
     -name available_attributes \
+    -caption [_ acs-object-management.available_attributes] \
     -multirow available_attributes \
     -key attribute_id \
     -bulk_actions [list [_ acs-object-management.add_checked_attributes] view-attributes-add [_ acs-object-management.add_checked_attributes]] \