mirror of https://github.com/schoebel/mars
marsadm: cleanup all orphane symlinks
This commit is contained in:
parent
1eea119870
commit
2a99f12294
|
@ -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;
|
||||
|
|
Loading…
Reference in New Issue