Index: openacs-4/packages/assessment/www/assessment.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/Attic/assessment.tcl,v diff -u -r1.33 -r1.34 --- openacs-4/packages/assessment/www/assessment.tcl 26 Jan 2005 23:13:16 -0000 1.33 +++ openacs-4/packages/assessment/www/assessment.tcl 29 Jan 2005 11:03:07 -0000 1.34 @@ -59,6 +59,9 @@ } else { db_1row unfinished_section_id {} db_1row unfinished_item_order {} + if {[empty_string_p $item_order]} { + db_1row unfinished_last_item {} + } incr section_order -1 incr item_order -1 }