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 -r1.10
--- openacs-4/packages/assessment/lib/section-items.tcl	13 Apr 2005 18:51:54 -0000	1.9
+++ openacs-4/packages/assessment/lib/section-items.tcl	9 Jun 2005 19:19:47 -0000	1.10
@@ -27,6 +27,7 @@
     
     set checks [as::section::checks_list -assessment_id $assessment_id -section_id $section_id] 
     set checks_related 0
+    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]