Index: openacs-4/packages/assessment/tcl/as-item-data-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-item-data-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/tcl/as-item-data-procs.tcl	11 Dec 2004 11:23:00 -0000	1.3
+++ openacs-4/packages/assessment/tcl/as-item-data-procs.tcl	20 Dec 2004 13:49:24 -0000	1.4
@@ -32,11 +32,11 @@
 
     # Insert as_item_data in the CR (and as_item_data table) getting the revision_id (item_data_id)
     db_transaction {
-        set item_data_id [content::item::new -parent_id $folder_id -content_type {as_item_data} -name "$as_item_id-$session_id-$choice_id_answer" -title "$as_item_id-$session_id-$choice_id_answer" ]
+        set item_data_id [content::item::new -parent_id $folder_id -content_type {as_item_data} -name "$as_item_id-$session_id-$choice_answer" -title "$as_item_id-$session_id-$choice_answer" ]
         set as_item_data_id [content::revision::new \
 				 -item_id $item_data_id \
 				 -content_type {as_item_data} \
-				 -title "$as_item_id-$session_id-$choice_id_answer" \
+				 -title "$as_item_id-$session_id-$choice_answer" \
 				 -attributes [list [list session_id $session_id] \
 						  [list subject_id $subject_id] \
 						  [list staff_id $staff_id] \
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.11 -r1.12
--- openacs-4/packages/assessment/www/process-response.tcl	8 Dec 2004 15:30:34 -0000	1.11
+++ openacs-4/packages/assessment/www/process-response.tcl	20 Dec 2004 13:50:40 -0000	1.12
@@ -47,7 +47,7 @@
         }
 	#insert the answered responses by user in the CR (and as_item_data table) 
         foreach response $response_to_item($response_to_item_name) {
-            as::item_data::new -session_id $as_session_id -as_item_id $response_to_item_id -choice_id_answer $response_to_item_choice_id -text_answer $response
+            as::item_data::new -session_id $as_session_id -as_item_id $response_to_item_id -choice_answer $response_to_item_choice_id -text_answer $response
         }
     } else {
         #the presentation type is textarea (short answer item)
@@ -66,7 +66,7 @@
         }
 	#insert the answered responses by user in the CR (and as_item_data table)
         foreach response $response_to_item($response_to_item_name) {
-            as::item_data::new -session_id $as_session_id -as_item_id $response_to_item_id -choice_id_answer $response
+            as::item_data::new -session_id $as_session_id -as_item_id $response_to_item_id -choice_answer $response
         }
         }
     }