--- builds_bin/update_repos 2007/12/11 06:24:14 1.31 +++ builds_bin/update_repos 2007/12/11 07:09:19 1.32 @@ -242,6 +242,8 @@ foreach my $smever ( sort { $a <=> $b } if ( $track{repo} eq $cmp->{repo} ) { if ( verrel($cmp, $cmp->{repo}, \%counts) ) { $cmp->{delete}++ unless $repos->{$cmp->{repo}}->{base}; + } elsif ( $cmp->{src} ) { + $cmp->{delete}++ unless $repos->{$cmp->{repo}}->{base}; } else { $track{svr} = $cmp->{svr}; } @@ -271,9 +273,9 @@ foreach my $smever ( sort { $a <=> $b } } } } elsif ( scalar keys %pkgs && $opts{s} ) { - print "\n * missing source (", $pkg->{repo}, ", ", $pkg->{svr}, ")\n"; + print "\n * missing source (sme$smever, ", $pkg->{repo}, ", ", $pkg->{svr}, ")\n"; } - print "\n * missing originals (", $pkg->{repo}, ", ", $pkg->{svr}, ")\n" if $opts{o} && scalar keys %orig != scalar keys %pkgs; + print "\n * missing originals (sme$smever, ", $pkg->{repo}, ", ", $pkg->{svr}, ")\n" if $opts{o} && scalar keys %orig != scalar keys %pkgs; } foreach my $r ( keys %$acnt ) {