Minor portability update to c_rehash.
This commit is contained in:
parent
5b50f99e1e
commit
a2688c872d
@ -15,7 +15,13 @@ if(defined $ENV{OPENSSL}) {
|
|||||||
$ENV{OPENSSL} = $openssl;
|
$ENV{OPENSSL} = $openssl;
|
||||||
}
|
}
|
||||||
|
|
||||||
my $pwd = `pwd`; chomp $pwd;
|
my $pwd;
|
||||||
|
eval "require Cwd";
|
||||||
|
if (defined(&Cwd::getcwd)) {
|
||||||
|
$pwd=Cwd::getcwd();
|
||||||
|
} else {
|
||||||
|
$pwd=`pwd`; chomp($pwd);
|
||||||
|
}
|
||||||
my $path_delim = ($pwd =~ /^[a-z]\:/i) ? ';' : ':'; # DOS/Win32 or Unix delimiter?
|
my $path_delim = ($pwd =~ /^[a-z]\:/i) ? ';' : ':'; # DOS/Win32 or Unix delimiter?
|
||||||
|
|
||||||
$ENV{PATH} .= "$path_delim$dir/bin";
|
$ENV{PATH} .= "$path_delim$dir/bin";
|
||||||
|
Loading…
x
Reference in New Issue
Block a user