| |
85 |
85 |
|
| |
86 |
86 |
:log test_item-auto_correct=$auto_correct |
| |
87 |
87 |
# |
| |
88 |
88 |
# Handle feedback_level. |
| |
89 |
89 |
# |
| |
90 |
90 |
# The object might be a form, just use the property, if we are on |
| |
91 |
91 |
# a FormPage. |
| |
92 |
92 |
# |
| |
93 |
93 |
if {[${:object} istype ::xowiki::FormPage]} { |
| |
94 |
94 |
set feedback_level_property [${:object} property feedback_level] |
| |
95 |
95 |
if {$feedback_level_property ne ""} { |
| |
96 |
96 |
set :feedback_level $feedback_level_property |
| |
97 |
97 |
} |
| |
98 |
98 |
} |
| |
99 |
99 |
|
| |
100 |
100 |
if {${:grading} ne "none"} { |
| |
101 |
101 |
if {${:grading} ni {exact partial}} { |
| |
102 |
102 |
error "invalid grading '$grading'; valid are 'exact' or 'partial'" |
| |
103 |
103 |
} |
| |
104 |
104 |
set options "{exact exact} {partial partial}" |
| |
105 |
|
set gradingSpec [subst {grading {select,options=$options,default=${:grading},label=#xowf.Grading-Schema#}}] |
| |
|
105 |
set gradingSpec [subst {grading {select,options=$options,default=${:grading},label=#xowf.Grading-Scheme#}}] |
| |
106 |
106 |
} else { |
| |
107 |
107 |
set gradingSpec "" |
| |
108 |
108 |
} |
| |
109 |
109 |
|
| |
110 |
110 |
if {$can_shuffle} { |
| |
111 |
111 |
set shuffle_options "{#xowf.shuffle_none# none} {#xowf.shuffle_peruser# peruser} {#xowf.shuffle_always# always}" |
| |
112 |
112 |
set shuffleSpec [subst { |
| |
113 |
113 |
{shuffle {radio,horizontal=true,form_item_wrapper_CSSclass=form-inline,options=$shuffle_options,default=none,label=#xowf.Shuffle#}} |
| |
114 |
114 |
{show_max {number,form_item_wrapper_CSSclass=form-inline,min=2,label=#xowf.show_max#}} |
| |
115 |
115 |
}] |
| |
116 |
116 |
} else { |
| |
117 |
117 |
set shuffleSpec "" |
| |
118 |
118 |
} |
| |
119 |
119 |
:create_components [subst { |
| |
120 |
120 |
{minutes number,min=1,default=2,label=#xowf.Minutes#} |
| |
121 |
121 |
$gradingSpec |
| |
122 |
122 |
$shuffleSpec |
| |
123 |
123 |
{interaction {$interaction_class,$options,feedback_level=${:feedback_level},auto_correct=${:auto_correct},label=}} |
| |
124 |
124 |
[:feed_back_definition] |
| |
125 |
125 |
}] |
