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.7.2.24 -r1.7.2.25
--- openacs-4/packages/xowf/tcl/test-item-procs.tcl 11 Feb 2020 21:26:04 -0000 1.7.2.24
+++ openacs-4/packages/xowf/tcl/test-item-procs.tcl 12 Feb 2020 12:43:26 -0000 1.7.2.25
@@ -582,6 +582,7 @@
"{#xowiki.single_word# single_word}"
"{#xowiki.multiple_words# multiple_words}"
"{#xowiki.multiple_lines# multiple_lines}"
+ "{#xowiki.file_upload# file_upload}"
} " "]
set textEntryConfigSpec [subst {
{options {radio,horizontal=true,form_item_wrapper_CSSclass=form-inline,options=$render_hints,default=single_word,label=#xowf.answer#}}
Index: openacs-4/packages/xowiki/catalog/xowiki.de_DE.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/catalog/xowiki.de_DE.ISO-8859-1.xml,v
diff -u -N -r1.47.2.9 -r1.47.2.10
--- openacs-4/packages/xowiki/catalog/xowiki.de_DE.ISO-8859-1.xml 25 Nov 2019 11:11:34 -0000 1.47.2.9
+++ openacs-4/packages/xowiki/catalog/xowiki.de_DE.ISO-8859-1.xml 12 Feb 2020 12:43:26 -0000 1.47.2.10
@@ -266,5 +266,6 @@
Einzelwort
Mehrere Worte
Mehrere Zeilen
+ Dateiabgabe
Index: openacs-4/packages/xowiki/catalog/xowiki.en_US.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/catalog/xowiki.en_US.ISO-8859-1.xml,v
diff -u -N -r1.71.2.10 -r1.71.2.11
--- openacs-4/packages/xowiki/catalog/xowiki.en_US.ISO-8859-1.xml 25 Nov 2019 11:11:34 -0000 1.71.2.10
+++ openacs-4/packages/xowiki/catalog/xowiki.en_US.ISO-8859-1.xml 12 Feb 2020 12:43:26 -0000 1.71.2.11
@@ -284,6 +284,7 @@
Questions
Answers
Words
+ File Upload
Number
Single Word
Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v
diff -u -N -r1.284.2.82 -r1.284.2.83
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 11 Feb 2020 20:32:32 -0000 1.284.2.82
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 12 Feb 2020 12:43:26 -0000 1.284.2.83
@@ -3838,11 +3838,18 @@
dict set field_fc_dict correct_when $a
lassign $option text rep
- if {[dict get $render_hints_dict words] eq "multiple_lines"} {
- set type textarea
- dict set field_fc_dict rows [dict get $render_hints_dict lines]
- } else {
- set type text
+ set render_hints [dict get $render_hints_dict words]
+ switch $render_hints {
+ "multiple_lines" {
+ set type textarea
+ dict set field_fc_dict rows [dict get $render_hints_dict lines]
+ }
+ "file_upload" {
+ set type file
+ }
+ default {
+ set type text
+ }
}
lappend fields [list $rep [:dict_to_fc -type $type $field_fc_dict]]
}