Fix dup detection

This commit is contained in:
hjp 2016-07-05 18:19:21 +00:00
parent da899cbf29
commit 42bd431dca
1 changed files with 1 additions and 0 deletions

View File

@ -12,6 +12,7 @@ sub collect {
$atime,$mtime,$ctime,$blksize,$blocks) = lstat($_);
return if $seen{"$dev:$ino"};
$hist{$size}++;
$seen{"$dev:$ino"} = 1;
}
find(\&collect, @ARGV ? @ARGV : ("."));