Index: openacs-4/packages/assessment/www/finish.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/finish.tcl,v diff -u -r1.12 -r1.13 --- openacs-4/packages/assessment/www/finish.tcl 7 Aug 2017 23:48:04 -0000 1.12 +++ openacs-4/packages/assessment/www/finish.tcl 20 Jan 2018 22:38:28 -0000 1.13 @@ -42,18 +42,21 @@ callback imsld::finish_object -object_id $assessment_id -user_id $user_id -session_id $session_id -if { ([info exists next_asm] && $next_asm ne "") } { +if { [info exists next_asm] && $next_asm ne "" } { ad_returnredirect "assessment?assessment_id=$next_asm" + ad_script_abort } set value [parameter::get -parameter "RegistrationId" -package_id [subsite::main_site_id]] if {[info exists return_url]} { if { $return_url ne ""} { ad_returnredirect "$return_url" + ad_script_abort } else { if {$value eq $assessment_id} { ad_returnredirect "/pvt/home" + ad_script_abort } } }