Index: openacs-4/packages/assessment/www/asm-admin/action-params.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/action-params.tcl,v diff -u -r1.7.8.1 -r1.7.8.2 --- openacs-4/packages/assessment/www/asm-admin/action-params.tcl 18 Aug 2014 20:25:03 -0000 1.7.8.1 +++ openacs-4/packages/assessment/www/asm-admin/action-params.tcl 18 Aug 2014 20:27:51 -0000 1.7.8.2 @@ -100,7 +100,7 @@ db_foreach get_params {} { set param_$parameter_id [as::assessment::check::get_parameter_value -parameter_id $parameter_id -type $type -check_id $inter_item_check_id] if { [set param_$parameter_id] eq ""} { - set param_$parameter_id [lindex [lindex $choices 0] 1] + set param_$parameter_id [lindex $choices 0 1] } }