Index: openacs-4/packages/categories/www/cadmin/category-phase-out.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/category-phase-out.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/categories/www/cadmin/category-phase-out.tcl	11 Feb 2004 10:28:02 -0000	1.5
+++ openacs-4/packages/categories/www/cadmin/category-phase-out.tcl	6 Nov 2008 15:50:44 -0000	1.6
@@ -8,6 +8,7 @@
     category_id:integer,multiple
     {locale ""}
     object_id:integer,optional
+    ctx_id:integer,optional
 } 
 
 permission::require_permission -object_id $tree_id -privilege category_tree_write
@@ -19,4 +20,4 @@
 }
 category_tree::flush_cache $tree_id
 
-ad_returnredirect [export_vars -no_empty -base tree-view { tree_id locale object_id }]
+ad_returnredirect [export_vars -no_empty -base tree-view { tree_id locale object_id ctx_id}]