Index: openacs-4/packages/cms/www/modules/items/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/www/modules/items/index.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/cms/www/modules/items/index.tcl 18 Sep 2002 03:58:43 -0000 1.4 +++ openacs-4/packages/cms/www/modules/items/index.tcl 16 Nov 2004 22:32:48 -0000 1.5 @@ -9,6 +9,8 @@ # HACK: sometimes the query string does not get parsed when returning # from revision-add-2. The reason for this is unclear. +set package_url [ad_conn package_url] + if { [string equal [ns_queryget item_id] {}] } { ns_log Notice "ITEM ID NOT FOUND...PARSING QUERY STRING" set item_id [lindex [split [ns_conn query] "="] 1] @@ -20,6 +22,7 @@ request create request set_param item_id -datatype integer request set_param mount_point -datatype keyword -optional -value sitemap +request set_param item_props_tab -datatype keyword -optional -value editing request set_param page -datatype integer -optional -value 1 @@ -37,6 +40,9 @@ db_1row get_info "" -column_array info template::util::array_to_vars info +set item_title [db_string get_item_title ""] +set page_title "Content Item - $item_title" + # build the path to the custom interface directory for this content type set custom_dir [file dirname [ns_conn url]]/custom/$content_type @@ -66,11 +72,11 @@ # Get the current tab, if any -set url [ns_conn url] +set url [ad_conn url] append url "?item_id=$item_id&mount_point=$mount_point&page=$page" -template::tabstrip create item_props -base_url $url -template::tabstrip add_tab item_props editing "Editing" editing -template::tabstrip add_tab item_props children "Sub-Items" children -template::tabstrip add_tab item_props publishing "Publishing" publishing -template::tabstrip add_tab item_props permissions "Permissions" permissions +# template::tabstrip create item_props -base_url $url +# template::tabstrip add_tab item_props editing "Editing" editing +# template::tabstrip add_tab item_props children "Sub-Items" children +# template::tabstrip add_tab item_props publishing "Publishing" publishing +# template::tabstrip add_tab item_props permissions "Permissions" permissions