Index: openacs-4/packages/assessment/www/admin/confirm-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/admin/Attic/confirm-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/assessment/www/admin/confirm-delete.tcl 24 Jan 2005 17:52:14 -0000 1.1 +++ openacs-4/packages/assessment/www/admin/confirm-delete.tcl 28 Jan 2005 20:33:19 -0000 1.2 @@ -7,7 +7,12 @@ section_id assessment_id } +as::assessment::data -assessment_id $assessment_id +set title "$assessment_data(title)" +set context [list [list "one-a?assessment_id=$assessment_id" $title] [list "checks-admin?assessment_id=$assessment_id§ion_id=$section_id" "$title [_ assessment.Administration]"] "[_ assessment.trigger_delete]"] +set title "[_ assessment.trigger_delete]" + ad_form -name delete_checks -form { {inter_item_check_id:text(hidden)