提交 9ef876f2 编写于 作者: B Bodo Möller

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

when symlink() fails.
上级 24bec03b
......@@ -49,7 +49,7 @@ my $to = join('/', @to_path);
my $file;
foreach $file (@files) {
# print "ln -s $to/$file $from/$file\n";
symlink("$to/$file", "$from/$file");
print $file . " => $from/$file\n";
my $err = "";
symlink("$to/$file", "$from/$file") or $err = " [$!]";
print $file . " => $from/$file$err\n";
}
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册