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.108 -r1.284.2.109
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	1 Jul 2020 19:31:58 -0000	1.284.2.108
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	13 Jul 2020 12:02:33 -0000	1.284.2.109
@@ -1761,7 +1761,7 @@
         fn ${:value} {
 
           regsub -all {\\+} $fn {/} fn  ;# fix IE upload path
-          set fn [::file tail ./$fn]    ;# prefix $fn to avoid potential tilde expansion
+          set fn [ad_file tail $fn]
 
           set file_object [:store_file \
                                -file_name $fn \