Index: openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/workflow-copy.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/workflow-copy.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/workflow-copy.tcl	19 Nov 2001 18:29:29 -0000	1.3
+++ openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/workflow-copy.tcl	6 Sep 2002 21:50:16 -0000	1.4
@@ -7,7 +7,7 @@
 } {
     workflow_key
 } -properties {
-    context_bar
+    context
     export_vars
     pretty_name
     new_workflow_key
@@ -22,7 +22,7 @@
     where  ot.object_type = :workflow_key
 }
 
-set context_bar [ad_context_bar [list "workflow?[export_url_vars workflow_key]" "$workflow_name"] "Copy process"]
+set context [list [list "workflow?[export_url_vars workflow_key]" "$workflow_name"] "Copy process"]
 
 
 db_1row pretty_names {