Index: openacs-4/packages/assessment/lib/assessment.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/assessment.tcl,v diff -u -N -r1.4 -r1.5 --- openacs-4/packages/assessment/lib/assessment.tcl 12 Jun 2006 22:41:01 -0000 1.4 +++ openacs-4/packages/assessment/lib/assessment.tcl 13 Jun 2006 01:22:54 -0000 1.5 @@ -17,7 +17,7 @@ {next_asm:optional} {response:multiple,optional} {next_url ""} - passed_section_id:optional + single_section_id:optional } -properties { context:onevalue page_title:onevalue @@ -107,7 +107,7 @@ # get all sections of assessment in correct order - if {![info exists passed_section_id]} { + if {![info exists single_section_id]} { set section_list [as::assessment::sections -assessment_id $assessment_rev_id -session_id $session_id -sort_order_type $assessment_data(section_navigation) -random_p $assessment_data(random_p)] if {[empty_string_p $section_order]} { # start at the first section @@ -122,7 +122,8 @@ } else { set section_order 0 - set section_list $section_id + set section_id $single_section_id + set section_list $single_section_id }