Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v
diff -u -r1.90.2.7 -r1.90.2.8
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	25 Jul 2014 16:49:35 -0000	1.90.2.7
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	28 Nov 2014 15:08:59 -0000	1.90.2.8
@@ -474,8 +474,8 @@
 	    set filesystem_attachments_root [parameter::get -parameter "FilesystemAttachmentsRoot" \
                               -package_id $mail_package_id -default ""]
 	    if {$filesystem_attachments_root eq ""} {
-		# on a unix system this should be '/tmp'
-		set filesystem_attachments_root [file dirname [ns_tmpnam]]
+		# on a unix system this could be '/tmp'
+		set filesystem_attachments_root [ad_tmpdir]
 	    }
             foreach f $filesystem_files {
 		# make the file name absolute
Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.133.2.55 -r1.133.2.56
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	16 Oct 2014 07:20:41 -0000	1.133.2.55
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	28 Nov 2014 15:09:00 -0000	1.133.2.56
@@ -4426,3 +4426,9 @@
     }
     ns_mktemp $template
 }
+
+ad_proc ad_tmpdir {} {
+    conveniece function to return the tmp directory
+} {
+    return [ns_config ns/parameters tmpdir]
+}
Index: openacs-4/packages/assessment/tcl/as-qti-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-qti-procs.tcl,v
diff -u -r1.47.4.1 -r1.47.4.2
--- openacs-4/packages/assessment/tcl/as-qti-procs.tcl	18 Aug 2014 20:25:02 -0000	1.47.4.1
+++ openacs-4/packages/assessment/tcl/as-qti-procs.tcl	28 Nov 2014 15:09:00 -0000	1.47.4.2
@@ -17,7 +17,7 @@
     
     if {[regexp -nocase -- {\.zip$} $tmp_dir]} {
 	# Generate a random directory name
-	set tmpdirectory [ns_tmpnam]
+	set tmpdirectory [ad_tmpnam]
 	# Create a temporary directory
 	file mkdir $tmpdirectory
 	# UNZIP the zip file in the temporary directory
@@ -49,7 +49,7 @@
 
     if {[regexp -nocase -- {\.zip$} $tmp_dir]} {
         # Generate a random directory name
-        set tmpdirectory [ns_tmpnam]
+        set tmpdirectory [ad_tmpnam]
         # Create a temporary directory
         file mkdir $tmpdirectory
         # UNZIP the zip file in the temporary directory
Index: openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl,v
diff -u -r1.3 -r1.3.6.1
--- openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl	7 Oct 2007 22:36:54 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl	28 Nov 2014 15:09:00 -0000	1.3.6.1
@@ -17,7 +17,7 @@
 set context [list "[_ assessment.Import_Results]"]
 
 # Generate a random directory name
-set tmpdirectory [ns_tmpnam]
+set tmpdirectory [ad_tmpnam]
 # Create a temporary directory
 file mkdir $tmpdirectory