Index: openacs-4/packages/categories/www/cadmin/tree-copy-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/www/cadmin/tree-copy-2.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/categories/www/cadmin/tree-copy-2.tcl	1 Mar 2005 00:01:27 -0000	1.5
+++ openacs-4/packages/categories/www/cadmin/tree-copy-2.tcl	6 Nov 2008 15:50:44 -0000	1.6
@@ -9,6 +9,7 @@
     source_tree_id:integer
     {locale ""}
     object_id:integer,optional
+    ctx_id:integer,optional
 }
 
 set user_id [auth::require_login]
@@ -17,4 +18,4 @@
 
 category_tree::copy -source_tree $source_tree_id -dest_tree $target_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}]