[project @ 1996-01-22 18:37:39 by partain]

[ghc-hetmet.git] / ghc / utils / hstags / hstags.prl

diff --git a/ghc/utils/hstags/hstags.prl b/ghc/utils/hstags/hstags.prl
index 073db47..519ba13 100644 (file)
--- a/ghc/utils/hstags/hstags.prl
+++ b/ghc/utils/hstags/hstags.prl
@@ -1,6 +1,9 @@
-$tmp    = (( $ENV{'TMPDIR'} ) # to make tmp file names
-          ? ($ENV{'TMPDIR'} . "/$$.eht")
-          : "$(TMPDIR)/$$.eht" );
+if ( $ENV{'TMPDIR'} ) { # where to make tmp file names
+    $tmp = $ENV{'TMPDIR'} . "/$$.eht";
+} else {
+    $tmp ="$(TMPDIR)/$$.eht";
+    $ENV{'TMPDIR'} = '$(TMPDIR)'; # set the env var as well
+}
 
 #------------------------------------------------------------------------
 # If you are adjusting paths by hand for a binary GHC distribution,