parscit/lib/ParsCit/Tr2crfpp.pm in biblicit-2.2.1 vs parscit/lib/ParsCit/Tr2crfpp.pm in biblicit-2.2.2
- old
+ new
@@ -980,11 +980,11 @@
if ($tmpfile =~ /^([-\@\w.]+)$/) { $tmpfile = $1; }
###
# Altered by Min (Thu Feb 28 13:08:59 SGT 2008)
###
- return "/tmp/$tmpfile";
- # return $tmpfile;
+ my $tmpdir = $ENV{'PARSCIT_TMPDIR'} || "/tmp";
+ return "$tmpdir/$tmpfile";
}
sub Fatal
{
my $msg = shift;