Index: openacs-4/packages/assessment/lib/assessment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/assessment.tcl,v
diff -u -r1.28.2.1 -r1.28.2.2
--- openacs-4/packages/assessment/lib/assessment.tcl	10 Sep 2015 08:27:53 -0000	1.28.2.1
+++ openacs-4/packages/assessment/lib/assessment.tcl	10 Nov 2016 21:52:03 -0000	1.28.2.2
@@ -333,7 +333,7 @@
 # form for display an assessment with sections and items
 ad_form -name show_item_form -action assessment -html {enctype multipart/form-data} -export $exports -form {
     {session_id:text(hidden) {value $session_id}}
-}
+} -has_submit 1
 
 multirow create items as_item_id name title description subtext required_p max_time_to_complete presentation_type html submitted_p content as_item_type_id choice_orientation next_as_item_id validate_block next_pr_type question_text
 
@@ -493,7 +493,7 @@
 	    db_dml session_updated {}
 	    # save answers
 	    foreach one_response \$item_list {
-		util_unlist \$one_response response_item_id
+		lassign \$one_response response_item_id
 		db_1row process_item_type {}
 		set item_type \[string range \$item_type end-1 end\]
 		if {!\[info exists response_to_item(\$response_item_id)\]} {