Index: openacs-4/packages/assessment/lib/assessment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/assessment.tcl,v
diff -u -r1.22.2.1 -r1.22.2.2
--- openacs-4/packages/assessment/lib/assessment.tcl	22 Jul 2008 09:20:22 -0000	1.22.2.1
+++ openacs-4/packages/assessment/lib/assessment.tcl	7 Sep 2008 20:19:49 -0000	1.22.2.2
@@ -335,7 +335,7 @@
     {session_id:text(hidden) {value $session_id}}
 }
 
-multirow create items as_item_id name title description subtext required_p max_time_to_complete presentation_type html submitted_p content as_item_type_id choice_orientation next_title validate_block next_pr_type question_text
+multirow create items as_item_id name title description subtext required_p max_time_to_complete presentation_type html submitted_p content as_item_type_id choice_orientation next_as_item_id validate_block next_pr_type question_text
 
 set unsubmitted_list [list]
 set validate_list [list]
@@ -456,10 +456,10 @@
     upvar 0 items:$i this
     if {$i < ${items:rowcount}} {
 	upvar 0 items:$j next
-	set this(next_title) $next(title)
+	set this(next_as_item_id) $next(as_item_id)
 	set this(next_pr_type) $next(presentation_type)
     } else {
-	set this(next_title) ""
+	set this(next_as_item_id) ""
 	set this(next_pr_type) ""
     }
 }