Index: openacs-4/packages/categories/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/index.adp,v diff -u -r1.2 -r1.3 --- openacs-4/packages/categories/www/index.adp 14 Dec 2003 15:39:52 -0000 1.2 +++ openacs-4/packages/categories/www/index.adp 6 Feb 2004 14:01:08 -0000 1.3 @@ -8,21 +8,6 @@ -

Select Trees for browsing:

+

Select Trees for browsing

- -
- - - - - - - - -
 
-
-
- - - + Index: openacs-4/packages/categories/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/index.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/categories/www/index.tcl 1 Feb 2004 19:12:51 -0000 1.3 +++ openacs-4/packages/categories/www/index.tcl 6 Feb 2004 14:01:08 -0000 1.4 @@ -20,7 +20,7 @@ set admin_p [permission::permission_p -object_id $package_id -privilege category_admin] -template::multirow create trees tree_id tree_name site_wide_p short_name +template::multirow create trees tree_ids tree_name site_wide_p short_name db_foreach get_trees "" { if { [string equal $has_read_p "t"] || [string equal $site_wide_p "t"] } { @@ -29,4 +29,16 @@ } } +template::list::create \ + -name trees \ + -key tree_ids \ + -no_data "None" \ + -bulk_actions { + "Browse" "categories-browse" "Browse through selected category trees" + } -elements { + tree_name { + label "Name" + } + } + ad_return_template