Index: openacs-4/packages/xowiki/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/admin/index.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/xowiki/www/admin/index.tcl	12 Feb 2006 01:21:38 -0000	1.7
+++ openacs-4/packages/xowiki/www/admin/index.tcl	18 Apr 2006 00:06:14 -0000	1.8
@@ -46,3 +46,9 @@
     }
 
 set t1 [t1 asHTML]
+
+# set up categories
+set package_id [ad_conn package_id]
+set category_map_url [export_vars -base \
+	  [site_node::get_package_url -package_key categories]cadmin/one-object \
+			  { { object_id $package_id } }]
\ No newline at end of file