Tolerate vanishing files
This commit is contained in:
parent
52d52cb258
commit
be21bc6ff8
|
@ -58,6 +58,7 @@ my @hist;
|
||||||
sub wanted {
|
sub wanted {
|
||||||
|
|
||||||
my $st = lstat($_);
|
my $st = lstat($_);
|
||||||
|
return unless $st;
|
||||||
my $age = $now - (
|
my $age = $now - (
|
||||||
$opts{atime} ? $st->atime :
|
$opts{atime} ? $st->atime :
|
||||||
$opts{mtime} ? $st->mtime :
|
$opts{mtime} ? $st->mtime :
|
||||||
|
|
Loading…
Reference in New Issue