- my $str = "Unexpected multiple matches on"
- . " $a->{fileName} ($a->{digest})\n";
- for ( my $i = 0 ; $i < @{$a->{files}} ; $i++ ) {
- $str .= " -> $a->{files}[$i]->{name}\n";
- }
- push(@{$a->{errors}}, $str);
+ #
+ # This is no longer a real error because $Conf{HardLinkMax}
+ # could be hit, thereby creating identical pool files
+ #
+ #my $str = "Unexpected multiple matches on"
+ # . " $a->{fileName} ($a->{digest})\n";
+ #for ( my $i = 0 ; $i < @{$a->{files}} ; $i++ ) {
+ # $str .= " -> $a->{files}[$i]->{name}\n";
+ #}
+ #push(@{$a->{errors}}, $str);