Index: openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl	30 Mar 2005 10:27:38 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/assessment-copy.tcl	8 Apr 2005 00:48:10 -0000	1.4
@@ -6,7 +6,7 @@
 } {
     assessment_id:integer
 } -properties {
-    context_bar:onevalue
+    context:onevalue
     page_title:onevalue
 }
 
@@ -27,7 +27,7 @@
 
 set assessment_rev_id $assessment_data(assessment_rev_id)
 set page_title "[_ assessment.copy_assessment]"
-set context_bar [ad_context_bar [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
+set context [list [list index [_ assessment.admin]] [list [export_vars -base one-a {assessment_id}] $assessment_data(title)] $page_title]
 
 set confirm_options [list [list "[_ assessment.continue_with_copy]" t] [list "[_ assessment.cancel_and_return]" f]]