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 -N -r1.9.2.2 -r1.9.2.3 --- openacs-4/packages/assessment/lib/section-items.tcl 19 Jul 2005 15:57:12 -0000 1.9.2.2 +++ openacs-4/packages/assessment/lib/section-items.tcl 1 Aug 2005 18:07:55 -0000 1.9.2.3 @@ -31,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 }