Index: openacs-4/packages/xowf/tcl/test-item-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test-item-procs.tcl,v
diff -u -N -r1.2.2.2 -r1.2.2.3
--- openacs-4/packages/xowf/tcl/test-item-procs.tcl	6 Mar 2017 00:12:32 -0000	1.2.2.2
+++ openacs-4/packages/xowf/tcl/test-item-procs.tcl	6 Mar 2017 00:16:54 -0000	1.2.2.3
@@ -158,7 +158,7 @@
   mc_interaction instproc initialize {} {
     if {[my set __state] ne "after_specs"} return
     test_item instvar {xinha(javascript) javascript}
-    my instvar feedback_level inplace input_field_names
+    my instvar feedback_level inplace input_field_names nr_choices
     #
     # build choices
     #
@@ -171,7 +171,7 @@
     #
     my create_components  [subst {
       {text  {richtext,required,height=150px,label=#xowf.exercise-text#}}
-      {mc {mc_choice,feedback_level=$feedback_level,label=#xowf.alternative#,inplace=$inplace,multiple=[my multiple],repeat=5..5}}
+      {mc {mc_choice,feedback_level=$feedback_level,label=#xowf.alternative#,inplace=$inplace,multiple=[my multiple],repeat=1..$nr_choices}}
     }]
     my set __initialized 1
   }