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.248.2.19 -r1.248.2.20
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	21 Mar 2016 20:59:19 -0000	1.248.2.19
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	5 May 2016 11:23:44 -0000	1.248.2.20
@@ -1000,7 +1000,7 @@
 
         #my log "name <$object_name> pretty value name '$(stripped_name)'"
         
-        set l [::xowiki::Link create new -destroy_on_cleanup \
+        set l [::xowiki::Link new -destroy_on_cleanup \
                    -page $object -type "file" -lang $(prefix) \
                    [list -stripped_name $(stripped_name)] [list -label $fn] \
                    [list -extra_query_parameter [list [list filename $fn]]] \