Index: openacs-4/packages/assessment/lib/section-items.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/section-items.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/assessment/lib/section-items.tcl	9 Jun 2005 19:19:47 -0000	1.10
+++ openacs-4/packages/assessment/lib/section-items.tcl	12 Jun 2006 02:49:50 -0000	1.11
@@ -1,3 +1,4 @@
+as::assessment::data -assessment_id $assessment_id
 ad_form -name admin_section -form {
     {section_id:text(hidden) {value $section_id}}
 }
@@ -30,8 +31,8 @@
     ns_log notice "[llength $checks]"
     foreach  check_sql $checks {
 	set cond_list  [split $check_sql "="]
-	set item_id [lindex [split [lindex $cond_list 2] " "] 0]
-	if {$item_id == $as_item_id} {
+	set item_id [lindex [split [lindex $cond_list 2] ")"] 0]
+	if {$item_id == $as_item_id_i} {
 	    incr checks_related
 	}