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 -r1.284.2.137 -r1.284.2.138
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	7 Jan 2021 16:43:10 -0000	1.284.2.137
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	13 Jan 2021 18:18:23 -0000	1.284.2.138
@@ -1773,7 +1773,7 @@
       $file_object set import_file $tmpfile
       eval $publish_date_cmd
       #
-      # When produduction_mode is set, make sure, the new file object
+      # When production_mode is set, make sure, the new file object
       # is not in a published state.
       #
       if {[::$package_id get_parameter production_mode 0]} {
@@ -1807,7 +1807,7 @@
 
     #
     # Make sure that we do not mis-interprete spaces in paths or file
-    # names.
+    # names in the foreach loop.
     #
     if {[llength ${:content-type}] == 1} {
       set :tmpfile [list ${:tmpfile}]
@@ -1850,6 +1850,7 @@
     # the revision_id. TODO: clear revision_id on export.
     #
     set newValue [list name $newValue revision_id $revision_ids]
+
     ${:object} set_property -new 1 ${:name} $newValue
     set :value $newValue
   }