Index: openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl,v
diff -u -N -r1.72.2.6 -r1.72.2.7
--- openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl	20 May 2019 11:30:45 -0000	1.72.2.6
+++ openacs-4/packages/acs-api-browser/tcl/acs-api-documentation-procs.tcl	17 Jun 2019 10:15:36 -0000	1.72.2.7
@@ -1095,7 +1095,7 @@
 } {
     catch {set dot [::util::which dot]}
     if {$dot ne ""} {
-        set dir /tmp/oacs-dotcode
+        set dir [ad_tmpdir]/oacs-dotcode
         if {![file isdirectory $dir]} {
             file mkdir $dir
         }
Index: openacs-4/packages/acs-content-repository/tcl/image-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/image-procs.tcl,v
diff -u -N -r1.18 -r1.18.2.1
--- openacs-4/packages/acs-content-repository/tcl/image-procs.tcl	16 Jan 2019 08:42:41 -0000	1.18
+++ openacs-4/packages/acs-content-repository/tcl/image-procs.tcl	17 Jun 2019 10:15:36 -0000	1.18.2.1
@@ -383,7 +383,7 @@
         set revision_id [content::item::get_best_revision -item_id $item_id]
     }
     set original_filename [content::revision::get_cr_file_path -revision_id $revision_id]
-    set tmp_filename [ns_mktemp "/tmp/XXXXXX"]
+    set tmp_filename [ns_mktemp "[ad_tmpdir]/XXXXXX"]
     array set sizes [image::get_convert_to_sizes]
 
     if {[catch {exec [image::convert_binary] -resize $sizes($size_name) $original_filename $tmp_filename} errmsg]} {
Index: openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl,v
diff -u -N -r1.21 -r1.21.2.1
--- openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl	21 Dec 2018 15:16:26 -0000	1.21
+++ openacs-4/packages/acs-subsite/tcl/email-image-procs.tcl	17 Jun 2019 10:15:36 -0000	1.21.2.1
@@ -160,7 +160,7 @@
     set email [email_image::get_email -user_id $user_id]
     set image_name "email${user_id}.gif"
     set email_length [string length $email]
-    set dest_path "/tmp/$image_name"
+    set dest_path "[ad_tmpdir]/$image_name"
     set width [expr {($email_length * ($font_size / 2)) + 2}]
     set height $font_size
     set ypos [expr { ($height / 2) + 3 }]
@@ -245,7 +245,7 @@
     set folder_id [email_image::get_folder_id]
     set image_name "email${user_id}.gif"
     set email_length [string length $new_email]
-    set dest_path "/tmp/$image_name"
+    set dest_path "[ad_tmpdir]/$image_name"
     set width [expr {($email_length * ($font_size / 2)) + 2}]
     set height $font_size
     set ypos [expr { ($height / 2) + 3 }]
Index: openacs-4/packages/acs-templating/tcl/head-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/head-procs.tcl,v
diff -u -N -r1.45.2.10 -r1.45.2.11
--- openacs-4/packages/acs-templating/tcl/head-procs.tcl	22 May 2019 08:12:13 -0000	1.45.2.10
+++ openacs-4/packages/acs-templating/tcl/head-procs.tcl	17 Jun 2019 10:15:36 -0000	1.45.2.11
@@ -18,6 +18,7 @@
     returned document.  This should be called at the beginning of any request
     handled by the templating system.
 } {
+    ns_log notice "----- template::reset_request_vars"
     array unset ::template::head::scripts
     array unset ::template::head::links
     array unset ::template::head::metas
Index: openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl,v
diff -u -N -r1.28.2.3 -r1.28.2.4
--- openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl	1 Mar 2019 10:47:19 -0000	1.28.2.3
+++ openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl	17 Jun 2019 10:15:36 -0000	1.28.2.4
@@ -187,7 +187,7 @@
         regsub -all {<[^<]*>} $text_to_spell_check "" text_to_spell_check
     }
 
-    set tmpfile [ns_mktemp "/tmp/webspellXXXXXX"]
+    set tmpfile [ns_mktemp "[ad_tmpdir]/webspellXXXXXX"]
     set f [open $tmpfile w]
     puts $f $text_to_spell_check
     close $f
Index: openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl,v
diff -u -N -r1.126.2.5 -r1.126.2.6
--- openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl	5 Jun 2019 10:26:31 -0000	1.126.2.5
+++ openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl	17 Jun 2019 10:19:23 -0000	1.126.2.6
@@ -2950,7 +2950,7 @@
             set fd [open $file r]
             set copy_command [subst -nobackslashes [read $fd]]
             close $fd
-            set copy_file [ns_mktemp /tmp/psql-copyfile-XXXXXX]
+            set copy_file [ns_mktemp [ad_tmpdir]/psql-copyfile-XXXXXX]
             set fd [open $copy_file "CREAT EXCL WRONLY" 0600]
             puts $fd $copy_command
             close $fd
Index: openacs-4/packages/acs-tcl/tcl/test/openacs-kernel-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/openacs-kernel-procs.tcl,v
diff -u -N -r1.5 -r1.5.2.1
--- openacs-4/packages/acs-tcl/tcl/test/openacs-kernel-procs.tcl	3 Nov 2018 11:15:16 -0000	1.5
+++ openacs-4/packages/acs-tcl/tcl/test/openacs-kernel-procs.tcl	17 Jun 2019 10:19:23 -0000	1.5.2.1
@@ -12,7 +12,7 @@
     aa_run_with_teardown -test_code {
 
         # Create cvs file
-        set file_loc "/tmp/test.csv"
+        set file_loc "[ad_tmpdir]/test.csv"
         set file_id [open $file_loc w]
         puts $file_id "first_name,last_name,instrument"
         puts $file_id "Charles,Mingus,Bass"
@@ -52,7 +52,7 @@
     aa_run_with_teardown -rollback -test_code {
 
         # Create cvs file of persons
-        set file_loc "/tmp/test.csv"
+        set file_loc "[ad_tmpdir]/test.csv"
         set file_id [open $file_loc w]
         puts $file_id "email,first_names,last_name"
         puts $file_id "cmingus@foo.bar,Charles,Mingus"
Index: openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl,v
diff -u -N -r1.6.2.3 -r1.6.2.4
--- openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl	12 Apr 2019 21:36:16 -0000	1.6.2.3
+++ openacs-4/packages/evaluation-portlet/tcl/test/tclwebtest-procs.tcl	17 Jun 2019 10:20:51 -0000	1.6.2.4
@@ -11,7 +11,7 @@
 ad_proc -private evaluation::twt::create_file {file_name}  {
 
     # Create a temporal file
-    set file_name "/tmp/$file_name"
+    set file_name "[ad_tmpdir]/$file_name"
     exec touch $file_name
     exec ls / >> $file_name
     exec chmod 777 $file_name
Index: openacs-4/packages/file-storage/tcl/test/tclwebtest-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/test/tclwebtest-procs.tcl,v
diff -u -N -r1.9.2.1 -r1.9.2.2
--- openacs-4/packages/file-storage/tcl/test/tclwebtest-procs.tcl	17 Apr 2019 11:00:16 -0000	1.9.2.1
+++ openacs-4/packages/file-storage/tcl/test/tclwebtest-procs.tcl	17 Jun 2019 10:20:52 -0000	1.9.2.2
@@ -19,7 +19,7 @@
     Creates a temporary file.
 } {
     # Create a temporary file
-    set file_name "/tmp/$f_name.txt"
+    set file_name "[ad_tmpdir]/$f_name.txt"
     exec touch $file_name
     exec ls / >> $file_name
     exec chmod 777 $file_name
Index: openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl,v
diff -u -N -r1.40.2.2 -r1.40.2.3
--- openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl	8 May 2019 14:30:45 -0000	1.40.2.2
+++ openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl	17 Jun 2019 10:20:51 -0000	1.40.2.3
@@ -122,7 +122,7 @@
   #
   # HttpRequestTrace can be used to trace one or all requests.
   # If activated, the class writes protocol data into 
-  # /tmp/req-<somenumber>.
+  # [ad_tmpdir]/req-<somenumber>.
   #
   # Use 
   #
@@ -790,7 +790,7 @@
     :instvar F post_data
     set :meta [list]
     set :requestCount [nsv_incr HttpRequestTrace count]  ;# make it an instvar to find it in the log file
-    set F [open /tmp/req-[format %.4d ${:requestCount}] w]
+    set F [open [ad_tmpdir]/req-[format %.4d ${:requestCount}] w]
     
     set method [expr {$post_data eq "" ? "GET" : "POST"}]
     puts $F "$method [:path] HTTP/1.0"
Index: openacs-4/packages/xowiki/tcl/syndicate-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/syndicate-procs.tcl,v
diff -u -N -r1.51.2.4 -r1.51.2.5
--- openacs-4/packages/xowiki/tcl/syndicate-procs.tcl	8 May 2019 19:59:57 -0000	1.51.2.4
+++ openacs-4/packages/xowiki/tcl/syndicate-procs.tcl	17 Jun 2019 10:20:51 -0000	1.51.2.5
@@ -380,7 +380,7 @@
     set data [expr {[dict exists $request page] ? [dict get $request page] : ""}]
 
     #:msg "statuscode = [$r set status_code], content_type=[$r set content_type]"
-    #set f [open /tmp/feed w]; fconfigure $f -translation binary; puts $f [$r set data]; close $f
+    #set f [open [ad_tmpdir]/feed w]; fconfigure $f -translation binary; puts $f [$r set data]; close $f
     # if {[$r exists status] && [$r set status] eq "canceled"} {
     #   set :errorMessage [$r set cancel_message]
     # }