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.19 -r1.284.2.20
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	4 Jul 2019 17:51:39 -0000	1.284.2.19
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	15 Jul 2019 15:04:57 -0000	1.284.2.20
@@ -695,7 +695,7 @@
     }
     set l [::xowiki::Link create new -destroy_on_cleanup \
                -page ${:object} -type "image" -lang $(prefix) \
-               -stripped_name $(stripped_name) label $label \
+               -stripped_name $(stripped_name) -label $label \
                -parent_id $(parent_id) -item_id $(item_id)]
 
     if {[:istype file]} {