naomi/dots
1
0
Fork 0
mirror of https://github.com/NaomiAmethyst/dots.git synced 2025-04-13 09:30:06 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixed a bug with replacing broken symlinks

Browse source
This commit is contained in:
Adrian Kreher 2009-09-22 16:12:37 -05:00
parent d157f48b14
commit a98d38ce29
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
install.pl
View file

@ -96,10 +96,10 @@ for my $file (keys %links) {
} }
# Remove the destination if it exists and we were told to force an overwrite # Remove the destination if it exists and we were told to force an overwrite
if($force && -f $dest) { if($force && -d $dest) {
unlink($dest) || warn "Couldn't unlink '$dest': $!\n";
} elsif($force && -d $dest) {
rmtree($dest) || warn "Couldn't rmtree '$dest': $!\n"; rmtree($dest) || warn "Couldn't rmtree '$dest': $!\n";
} elsif($force) {
unlink($dest) || warn "Couldn't unlink '$dest': $!\n";
} }
symlink($src => $dest) ? $i++ : warn "Couldn't link '$src' to '$dest': $!\n"; symlink($src => $dest) ? $i++ : warn "Couldn't link '$src' to '$dest': $!\n";