Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -N -r1.542.2.107 -r1.542.2.108
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	25 May 2021 19:43:51 -0000	1.542.2.107
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl	2 Aug 2021 21:23:20 -0000	1.542.2.108
@@ -1052,15 +1052,16 @@
 
   File instproc demarshall {args} {
     next
-    # we have to care about recoding the file content
+    # we have to care about saving the file content
 
     if {[info exists :__file_content]} {
-      set :import_file [ad_tmpnam]
-      ::xo::write_file ${:import_file} [::base64::decode ${:__file_content}]
+      ::xo::write_tmp_file :import_file [::base64::decode ${:__file_content}]
       unset :__file_content
+
     } elseif {[info exists :__file_name]} {
       set :import_file ${:__file_name}
       unset :__file_name
+
     } else {
       error "either __file_content or __file_name must be set"
     }