Index: openacs-4/packages/assessment/www/process-response.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/Attic/process-response.tcl,v diff -u -r1.12 -r1.13 --- openacs-4/packages/assessment/www/process-response.tcl 20 Dec 2004 13:50:40 -0000 1.12 +++ openacs-4/packages/assessment/www/process-response.tcl 22 Dec 2004 11:01:33 -0000 1.13 @@ -42,7 +42,7 @@ # the presentation type is textbox (fill in the blank item) if {[info exists tb__display_id]} { - db_foreach session_responses_to_item {SELECT as_item_datax.item_id FROM as_item_datax WHERE as_item_datax.as_item_id=:response_to_item_id AND as_item_datax.choice_id_answer=:response_to_item_choice_id AND as_item_datax.session_id=:as_session_id} { + db_foreach session_responses_to_item {SELECT as_item_datax.item_id FROM as_item_datax WHERE as_item_datax.as_item_id=:response_to_item_id AND as_item_datax.choice_answer=:response_to_item_choice_id AND as_item_datax.session_id=:as_session_id} { content::item::delete -item_id $item_id } #insert the answered responses by user in the CR (and as_item_data table)