Index: openacs-4/packages/acs-subsite/www/admin/object-types/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/object-types/one.tcl,v diff -u -N -r1.6 -r1.7 --- openacs-4/packages/acs-subsite/www/admin/object-types/one.tcl 22 Jul 2005 05:04:29 -0000 1.6 +++ openacs-4/packages/acs-subsite/www/admin/object-types/one.tcl 4 Jun 2006 00:45:45 -0000 1.7 @@ -12,46 +12,17 @@ object_type:notnull } - -if { ![db_0or1row object_type { - select supertype, - abstract_p, - pretty_name, - pretty_plural, - table_name, - id_column, - name_method, - type_extension_table, - package_name, - dynamic_p - from acs_object_types - where object_type = :object_type -}] } { - ad_return_complaint 1 "
[acs_object_type_hierarchy -object_type $object_type] | -- Hierarchical Index | Alphabetical Index - | -
Information: