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]]
     }