projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2001-08-29 16:02:30 by rje]
[ghc-hetmet.git]
/
ghc
/
utils
/
stat2resid
/
stat2resid.prl
diff --git
a/ghc/utils/stat2resid/stat2resid.prl
b/ghc/utils/stat2resid/stat2resid.prl
index
71e4255
..
bf0a262
100644
(file)
--- a/
ghc/utils/stat2resid/stat2resid.prl
+++ b/
ghc/utils/stat2resid/stat2resid.prl
@@
-3,7
+3,7
@@
#
# Perl script expect bindings for the following variables to be prepended
#
#
# Perl script expect bindings for the following variables to be prepended
#
-# TMPDIR libdir
+# DEFAULT_TMPDIR libdir
#
# without them, not much success :-(
#
#
# without them, not much success :-(
#
@@
-14,8
+14,8
@@
$outsuffix = ".resid.ps"; # change as appropriate
if ( $ENV{'TMPDIR'} ) { # where to make tmp file names
$tmpfile = $ENV{'TMPDIR'} . "/$$.resid.data";
} else {
if ( $ENV{'TMPDIR'} ) { # where to make tmp file names
$tmpfile = $ENV{'TMPDIR'} . "/$$.resid.data";
} else {
- $tmpfile ="${TMPDIR}/$$.resid.data";
- $ENV{'TMPDIR'} = ${TMPDIR}; # set the env var as well
+ $tmpfile ="${DEFAULT_TMPDIR}/$$.resid.data";
+ $ENV{'TMPDIR'} = ${DEFAULT_TMPDIR}; # set the env var as well
}
@INC = ( ${libdir} );
}
@INC = ( ${libdir} );