generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Report "error" (usually just "File exists", which is harmless)

Browse Source 
when symlink() fails.
This commit is contained in:
Bodo Möller 2000-06-14 10:09:46 +00:00
parent 24bec03beb
commit 9ef876f269
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
util/mklink.pl
View File

@ -49,7 +49,7 @@ my $to = join('/', @to_path);
my $file; my $file;
foreach $file (@files) { foreach $file (@files) {
# print "ln -s $to/$file $from/$file\n"; my $err = "";
symlink("$to/$file", "$from/$file"); symlink("$to/$file", "$from/$file") or $err = " [$!]";
print $file . " => $from/$file\n"; print $file . " => $from/$file$err\n";
} }