3
0
Fork 0
forked from mirrors/nixpkgs

setup-etc.pl: Fail when symlink/rename fails

When atomicSymlink can't symlink or rename, it should return failure. This is then handled with `... or die` and `... or warn`
This commit is contained in:
wmertens 2014-10-06 08:00:11 +02:00
parent d3a7c50364
commit 36641d9e69

View file

@ -12,8 +12,8 @@ sub atomicSymlink {
my ($source, $target) = @_;
my $tmp = "$target.tmp";
unlink $tmp;
symlink $source, $tmp or return 1;
rename $tmp, $target or return 1;
symlink $source, $tmp or return 0;
rename $tmp, $target or return 0;
return 1;
}