Index: openacs-4/packages/xowf/lib/online-exam-answer.wf =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/lib/online-exam-answer.wf,v diff -u -N -r1.2.2.5 -r1.2.2.6 --- openacs-4/packages/xowf/lib/online-exam-answer.wf 17 Oct 2019 19:48:17 -0000 1.2.2.5 +++ openacs-4/packages/xowf/lib/online-exam-answer.wf 18 Oct 2019 13:53:54 -0000 1.2.2.6 @@ -279,7 +279,8 @@ set newName $prefix[incr counter] #:log "rename= $oldName -> '$newName'" set fc [:map_form_constraints $fc $oldName $newName] - set disabled_fc [lmap f $fc { + set disabled_fc [:map_form_constraints $disabled_fc $oldName $newName] + set disabled_fc [lmap f $disabled_fc { if {[string match "$newName*" $f]} { append f ,disabled=true } set f }]