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.5 -r1.6
--- openacs-4/packages/assessment/www/process-response.tcl	8 Oct 2004 11:52:40 -0000	1.5
+++ openacs-4/packages/assessment/www/process-response.tcl	14 Oct 2004 13:30:59 -0000	1.6
@@ -37,14 +37,14 @@
             content::item::delete -item_id $item_id
         }
         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_id_answer $response_to_item_choice_id -text_answer $response
         }
     } else {
         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.session_id=:as_session_id} {
         content::item::delete -item_id $item_id
         }
         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_id_answer $response
         }
     }
 }