Index: openacs-4/packages/dynamic-types/lib/templates/add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/lib/templates/Attic/add.tcl,v diff -u -r1.1.2.2 -r1.1.2.3 --- openacs-4/packages/dynamic-types/lib/templates/add.tcl 18 Feb 2005 17:03:11 -0000 1.1.2.2 +++ openacs-4/packages/dynamic-types/lib/templates/add.tcl 18 Feb 2005 19:20:10 -0000 1.1.2.3 @@ -19,16 +19,19 @@ if {[info exists id_column] && $id_column ne ""} { dtype::form::add_elements \ + -dform standard \ -object_id $id_column \ -form add } else { dtype::form::add_elements \ -form add \ + -dform standard -object_type __object_type } if {[template::form::is_submission add]} { dtype::form::process \ -form add \ + -dform standard -object_type __object_type } Index: openacs-4/packages/dynamic-types/lib/templates/edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/lib/templates/Attic/edit.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/dynamic-types/lib/templates/edit.tcl 18 Feb 2005 17:03:11 -0000 1.1.2.1 +++ openacs-4/packages/dynamic-types/lib/templates/edit.tcl 18 Feb 2005 19:20:10 -0000 1.1.2.2 @@ -1,7 +1,7 @@ ad_page_contract { } -query { - id_column:integer,notnull + object_id:integer,notnull } -properties { page_title context @@ -14,22 +14,25 @@ permission::require_permission \ -party_id $user_id \ - -object_id $id_column \ + -object_id $object_id \ -privilege "write" -if {[info exists id_column] && $id_column ne ""} { +if {[info exists object_id] && $object_id ne ""} { dtype::form::add_elements \ - -object_id $id_column \ - -form edit + -object_id $object_id \ + -form edit \ + -dform standard } else { dtype::form::add_elements \ -form edit \ - -object_type __object_type + -object_type __object_type \ + -dform standard } if {[template::form::is_submission edit]} { dtype::form::process \ -form edit \ - -object_type __object_type + -object_type __object_type \ + -dform standard } set page_title "Edit pretty_name" Index: openacs-4/packages/dynamic-types/lib/templates/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dynamic-types/lib/templates/Attic/one.tcl,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/dynamic-types/lib/templates/one.tcl 18 Feb 2005 17:03:11 -0000 1.1.2.1 +++ openacs-4/packages/dynamic-types/lib/templates/one.tcl 18 Feb 2005 19:20:10 -0000 1.1.2.2 @@ -19,7 +19,8 @@ dtype::form::add_elements \ -object_id $id_column \ - -form display + -form display \ + -dform standard template::form::set_properties \ display \