diff options
author | Richard Levitte <levitte@openssl.org> | 2001-04-04 15:51:36 +0000 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2001-04-04 15:51:36 +0000 |
commit | 75c3c831db58232769f727d76e0504ce138f2dfc (patch) | |
tree | 63c27e035a1eee89418ddff0611f9885277701fe /util/mklink.pl | |
parent | 385af2e9ec87b4534c88fa7fb0080c592ca43d6d (diff) |
Incorporate some changes that make OpenSSL compilable in CygWin.
Diffstat (limited to 'util/mklink.pl')
-rwxr-xr-x | util/mklink.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/util/mklink.pl b/util/mklink.pl index d7b997ada7..9e9c9a5146 100755 --- a/util/mklink.pl +++ b/util/mklink.pl @@ -48,8 +48,13 @@ foreach $dirname (@from_path) { my $to = join('/', @to_path); my $file; +$symlink_exists=eval {symlink("",""); 1}; foreach $file (@files) { my $err = ""; - symlink("$to/$file", "$from/$file") or $err = " [$!]"; + if ($symlink_exists) { + symlink("$to/$file", "$from/$file") or $err = " [$!]"; + } else { + system ("cp", "$file", "$from/$file") and $err = " [$!]"; + } print $file . " => $from/$file$err\n"; } |