Index: xotcl/library/comm/PCache.xotcl
===================================================================
diff -u -r1aa7246cc8e44078c9dbd33e03992478615f314f -r99a7a21854051cd691029b15ef8877aa9e86cf44
--- xotcl/library/comm/PCache.xotcl	(.../PCache.xotcl)	(revision 1aa7246cc8e44078c9dbd33e03992478615f314f)
+++ xotcl/library/comm/PCache.xotcl	(.../PCache.xotcl)	(revision 99a7a21854051cd691029b15ef8877aa9e86cf44)
@@ -1,4 +1,4 @@
-# -*- Tcl -*- $Id: PCache.xotcl,v 1.6 2006/09/27 08:12:40 neumann Exp $
+# -*- Tcl -*- $Id: PCache.xotcl,v 1.7 2007/08/06 11:35:56 neumann Exp $
 # Persistent Cache object, using gdbm
 
 # Configuration:
@@ -10,7 +10,7 @@
 # 2) If "CACHE_DIR" is not set, the global variable "homedir"
 #    is checked, which is assumed to be the home directory
 #    of the Cineast browser
-# 3) As a last resource the /tmp directory is used as the cache directory
+# 3) As a last resource the tmp directory is used as the cache directory
 #
 # Additionally, the cache directory can be specified after loading of this
 # file (before the first open) through the instance variable "dir"
@@ -29,7 +29,7 @@
 
     if {![info exists CACHE_DIR]} {
 	if {![info exists homeDir]} {
-	    set homeDir /tmp
+	    set homeDir [::xotcl::tmpdir]
 	}
 	set CACHE_DIR $homeDir/cache2
     }