--- builds_bin/update_repos 2007/05/04 15:05:25 1.5 +++ builds_bin/update_repos 2007/05/04 16:12:51 1.6 @@ -127,7 +127,7 @@ foreach my $pkg ( keys %repohash ) { @{$repohash{$pkg}{$pos}} = grep { $_ gt $repohash{$pkg}{latest} } @{$repohash{$pkg}{$pos}}; delete $repohash{$pkg}{$pos}; } - } else { + } elsif ( ref($repohash{$pkg}{$pos}) eq 'ARRAY' ) { my ($latest, @rest) = sort { $b cmp $a } @{$repohash{$pkg}{$pos}}; delete $repohash{$pkg}{$pos}; if ( $repohash{$pkg}{latest} && $repohash{$pkg}{latest} ge $latest ) {