Index: openacs-4/packages/assessment/www/assessment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/assessment.tcl,v
diff -u -r1.32 -r1.33
--- openacs-4/packages/assessment/www/assessment.tcl	26 Jan 2005 21:50:34 -0000	1.32
+++ openacs-4/packages/assessment/www/assessment.tcl	26 Jan 2005 23:13:16 -0000	1.33
@@ -286,7 +286,7 @@
 		    set response_to_item(\$response_item_id) \"\"
 		} else {
 
-                   set section_to_tmp \[as::assessment::checks::branch_checks -item_id \$response_item_id -response \$response_to_item(\$response_item_id) -session_id $session_id -assessment_id $assessment_id\ -section_id $section_id]
+                   set section_to_tmp \[as::assessment::check::branch_checks -item_id_to \$response_item_id -response \$response_to_item(\$response_item_id) -session_id $session_id -assessment_id $assessment_id\ -section_id $section_id]
                    if { \$section_to_tmp != \"f\" && \$section_to_tmp != \"f\"} {
                            set section_to \$section_to_tmp
                     }