marsadm: cleanup all orphane symlinks

This commit is contained in:
Thomas Schoebel-Theuer 2015-04-29 08:13:23 +02:00
parent 1eea119870
commit 2a99f12294
1 changed files with 1 additions and 1 deletions

View File

@ -1814,7 +1814,7 @@ sub logdelete_res {
my ($cmd, $res) = @_;
lprint "removing left-over .deleted symlinks...\n" if $verbose;
my $start_time = mars_time();
foreach my $leftlink (glob("$mars/resource-$res/.deleted-*")) {
foreach my $leftlink (glob("$mars/{,resource-$res/}{,*/}.deleted-*")) {
my $stamp = get_link_stamp($leftlink);
next unless $stamp + 3600 * 24 < $start_time;
lprint " unlink '$leftlink'\n" if $verbose;