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