Index: openacs-4/packages/xowf/lib/answer-single-question.wf =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/lib/Attic/answer-single-question.wf,v diff -u -r1.1.2.5 -r1.1.2.6 --- openacs-4/packages/xowf/lib/answer-single-question.wf 15 Nov 2021 17:02:37 -0000 1.1.2.5 +++ openacs-4/packages/xowf/lib/answer-single-question.wf 19 Jan 2022 20:02:38 -0000 1.1.2.6 @@ -97,14 +97,21 @@ if {[$form_obj property item_type] eq "PoolQuestion"} { # # In the case of a PoolQuestion, we have to replace the question. - # + # set form_obj [::xowf::test_item::question_manager replace_pool_question \ -position 1 \ -seed [clock seconds] \ -field_name answer \ -pool_question_obj $form_obj \ -exam_question_names ""] } + # + # Perform same substitutions as in other test-item workflows. + # + set d [::xowf::test_item::question_manager item_substitute_markup -form_obj $form_obj -obj $obj -position 1] + $form_obj set_property form [dict get $d form] + $form_obj set_property form_constraints [dict get $d form_constraints] + return $form_obj }