Index: openacs-4/packages/file-storage/www/file-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-add.tcl,v
diff -u -r1.17.2.4 -r1.17.2.5
--- openacs-4/packages/file-storage/www/file-add.tcl	5 Oct 2013 08:30:36 -0000	1.17.2.4
+++ openacs-4/packages/file-storage/www/file-add.tcl	1 Apr 2014 18:37:32 -0000	1.17.2.5
@@ -147,7 +147,7 @@
   }
   if { $unpack_p && $unpack_binary ne "" && [file extension [template::util::file::get_property filename $upload_file]] eq ".zip"  } {
 	
-	set path [ns_tmpnam]
+	set path [ad_tmpnam]
 	file mkdir $path
 	
 	
@@ -177,7 +177,7 @@
         # create a tmp file to import from user entered HTML
         set content_body [template::util::richtext::get_property html_value $content_body]
         set mime_type text/html
-        set tmp_filename [ns_tmpnam]
+        set tmp_filename [ad_tmpnam]
         set fd [open $tmp_filename w] 
         puts $fd $content_body
         close $fd