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.91 -r1.92
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	27 Oct 2014 16:39:41 -0000	1.91
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	27 Apr 2015 15:28:17 -0000	1.92
@@ -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