X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=glafp-utils%2Fscripts%2Frunstdtest.prl;fp=glafp-utils%2Fscripts%2Frunstdtest.prl;h=a6c964f03d962d651cc0de72882b36c0993d35b6;hb=e0befe921f5bbfa6daba3f8ff46cdf2a2abad1da;hp=4ba2f09e95fe5d9ed7d4728958180ec5f060977b;hpb=68a1f0233996ed79824d11d946e9801473f6946c;p=ghc-hetmet.git

diff --git a/glafp-utils/scripts/runstdtest.prl b/glafp-utils/scripts/runstdtest.prl
index 4ba2f09..a6c964f 100644
--- a/glafp-utils/scripts/runstdtest.prl
+++ b/glafp-utils/scripts/runstdtest.prl
@@ -34,7 +34,12 @@ $Status = 0;
 @PgmArgs = ();
 $PgmExitStatus = 0;
 $PgmStdinFile  = '/dev/null';
-$TmpPrefix = '$(TMPDIR)';
+if ( $ENV{'TMPDIR'} ) { # where to make tmp file names
+    $TmpPrefix = $ENV{'TMPDIR'};
+} else {
+    $TmpPrefix ="$(TMPDIR)";
+    $ENV{'TMPDIR'} = '$(TMPDIR)'; # set the env var as well
+}
 $ScriptFile = "$TmpPrefix/run_me$$";
 $DefaultStdoutFile = "$TmpPrefix/no_stdout$$"; # can't use /dev/null (e.g. Alphas)
 $DefaultStderrFile = "$TmpPrefix/no_stderr$$";