Fixed to properly catch multiply defined symbols.

pull/1/head
Michael Brown 2005-04-23 14:54:30 +00:00
parent 9dc7ebc152
commit d94cb57143
1 changed files with 1 additions and 1 deletions

View File

@ -39,7 +39,7 @@ while ( ( my $symbol, my $info ) = each %$symbols ) {
$problems->{$_}->{nonexistent}->{$symbol} = 1 foreach @requires;
} elsif ( @provides > 1 ) {
# Symbol defined in multiple objects
$problems->{$_}->{multiples}->{$symbol} = 1 foreach @requires;
$problems->{$_}->{multiples}->{$symbol} = 1 foreach @provides;
}
if ( @requires == 0 ) {
# Symbol not required