1 files changed, 1 insertions, 1 deletions
diff --git a/tests.scm b/tests.scm
index 329a31a..a4339ca 100644
--- a/tests.scm
+++ b/tests.scm
@@ -272,7 +272,7 @@
 (define (mkdtemp . components)
   (canonical-path (_mkdtemp (if (null? components)
 				(path-join
-				 (if *win32* (getenv "Temp") "/tmp")
+				 (get-temp-path)
 				 (string-append "gpgscm-" (get-isotime) "-"
 						(basename-suffix *scriptname* ".scm")
 						"-XXXXXX"))