Kaydet (Commit) 51cc70ce authored tarafından Vladimir Glazounov's avatar Vladimir Glazounov

#i81911# temporary roll back TMP dir requirements

üst 14e25ed2
...@@ -7,9 +7,9 @@ ...@@ -7,9 +7,9 @@
# #
# $RCSfile: build.pl,v $ # $RCSfile: build.pl,v $
# #
# $Revision: 1.160 $ # $Revision: 1.161 $
# #
# last change: $Author: vg $ $Date: 2007-11-06 12:30:16 $ # last change: $Author: vg $ $Date: 2007-11-22 14:44:59 $
# #
# The Contents of this file are made available subject to # The Contents of this file are made available subject to
# the terms of GNU Lesser General Public License Version 2.1. # the terms of GNU Lesser General Public License Version 2.1.
...@@ -78,7 +78,7 @@ ...@@ -78,7 +78,7 @@
( $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/; ( $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/;
$id_str = ' $Revision: 1.160 $ '; $id_str = ' $Revision: 1.161 $ ';
$id_str =~ /Revision:\s+(\S+)\s+\$/ $id_str =~ /Revision:\s+(\S+)\s+\$/
? ($script_rev = $1) : ($script_rev = "-"); ? ($script_rev = $1) : ($script_rev = "-");
...@@ -1982,11 +1982,9 @@ sub is_output_tree { ...@@ -1982,11 +1982,9 @@ sub is_output_tree {
sub get_tmp_dir { sub get_tmp_dir {
my $tmp_dir; my $tmp_dir;
if( defined($ENV{TMP}) ) { if( defined($ENV{TMP}) ) {
print_error("the \$TMP directory $ENV{TMP} does not exist! Please, create it first.") if (!-d $ENV{TMP});
$tmp_dir = $ENV{TMP} . '/'; $tmp_dir = $ENV{TMP} . '/';
} else { } else {
print_error("the \$TMP environment variable is not defined! Please, define it..."); $tmp_dir = '/tmp/';
# $tmp_dir = '/tmp/';
} }
$tmp_dir .= $$ while (-d $tmp_dir); $tmp_dir .= $$ while (-d $tmp_dir);
$tmp_dir = CorrectPath($tmp_dir); $tmp_dir = CorrectPath($tmp_dir);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment