Index: openacs-4/packages/assessment/www/asm-admin/section-copy.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/section-copy.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/assessment/www/asm-admin/section-copy.tcl 2 Feb 2005 21:31:15 -0000 1.2 +++ openacs-4/packages/assessment/www/asm-admin/section-copy.tcl 6 May 2005 00:42:39 -0000 1.3 @@ -8,7 +8,7 @@ section_id:integer after:integer } -properties { - context_bar:onevalue + context:onevalue page_title:onevalue } @@ -25,7 +25,7 @@ } set page_title "[_ assessment.copy_section]" -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]]