Index: openacs-4/packages/assessment/www/assessment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/assessment.tcl,v
diff -u -r1.44 -r1.45
--- openacs-4/packages/assessment/www/assessment.tcl	13 Apr 2005 18:51:54 -0000	1.44
+++ openacs-4/packages/assessment/www/assessment.tcl	14 Apr 2005 14:52:58 -0000	1.45
@@ -340,7 +340,7 @@
     set max_time_to_complete [as::assessment::pretty_time -seconds $max_time_to_complete]
 
     if {$presentation_type == "rb" || $presentation_type == "cb"} {
-	array set item [as::item_form::item_data -as_item_id $as_item_id]
+	array set item [as::item::item_data -as_item_id $as_item_id]
 	array set type [as::item_display_$presentation_type\::data -type_id $item(display_type_id)]
 	set choice_orientation $type(choice_orientation)
 	array unset item