234 |
} |
} |
235 |
$cmp->{oldrepo} = $cmp->{repo} unless $cmp->{oldrepo}; |
$cmp->{oldrepo} = $cmp->{repo} unless $cmp->{oldrepo}; |
236 |
$cmp->{repo} = $dest; |
$cmp->{repo} = $dest; |
237 |
|
$track{repo} = $dest unless $dest eq $track{repo}; |
238 |
} |
} |
239 |
if ( $cmp->{src} && $reposrc{$cmp->{repo}} ) { |
if ( $cmp->{src} && $reposrc{$cmp->{repo}} ) { |
240 |
$reposrc{$cmp->{repo}}->{srpm} = $cmp; |
$reposrc{$cmp->{repo}}->{srpm} = $cmp; |
250 |
$track{svr} = $cmp->{svr}; |
$track{svr} = $cmp->{svr}; |
251 |
} |
} |
252 |
} elsif ( ! $repos->{$cmp->{repo}}->{base} ) { |
} elsif ( ! $repos->{$cmp->{repo}}->{base} ) { |
253 |
$cmp->{delete}++; |
if ( $repos->{$cmp->{repo}}->{orig} ) { |
254 |
|
$srpm = $cmp if ! $srpm && $cmp->{src}; |
255 |
|
my $dest = $repos->{$track{repo}}->{prio} > $repos->{$devel2}->{prio} ? $track{repo} : $devel2; |
256 |
|
$dest = pkgdest($cmp, $devel1, $dest, $rpms->{$base}->{rpms}); |
257 |
|
$dest = $devel1 if verrel($cmp, $dest, \%counts); |
258 |
|
unless ( verrel($cmp, $dest, \%counts) ) { |
259 |
|
push @{$cmp->{repos}}, $dest; |
260 |
|
if ( $repos->{$cmp->{repo}}->{orig} ) { |
261 |
|
$orig{$cmp->{nvra}}++; |
262 |
|
} elsif ( $cmp->{src} && $reposrc{$cmp->{repo}} ) { |
263 |
|
$reposrc{$cmp->{repo}}->{srpm} = $cmp; |
264 |
|
} else { |
265 |
|
$cmp->{delete}++; |
266 |
|
} |
267 |
|
$cmp->{oldrepo} = $cmp->{repo} unless $cmp->{oldrepo}; |
268 |
|
$cmp->{repo} = $dest; |
269 |
|
if ( $cmp->{src} && $reposrc{$cmp->{repo}} ) { |
270 |
|
$reposrc{$cmp->{repo}}->{srpm} = $cmp; |
271 |
|
} |
272 |
|
} else { |
273 |
|
$cmp->{delete}++; |
274 |
|
} |
275 |
|
} else { |
276 |
|
$cmp->{delete}++; |
277 |
|
} |
278 |
} |
} |
279 |
} |
} |
280 |
unless ( $repos->{$cmp->{repo}}->{orig} || ( $cmp->{delete} && ! $cmp->{repos} ) ) { |
unless ( $repos->{$cmp->{repo}}->{orig} || ( $cmp->{delete} && ! $cmp->{repos} ) ) { |