diff options
Diffstat (limited to 'iurt2')
| -rwxr-xr-x | iurt2 | 28 |
1 files changed, 15 insertions, 13 deletions
@@ -1334,19 +1334,21 @@ sub check_pid { sub check_media { my ($run, $cache, $config, $srpm_version, $wrong_rpm, $provides, $pack_provide, $maint) = @_; # We could rely on only parsing the synthesis, hoping that they are correct, however this scan is very fast, so... - if (!$run->{build_all}) { foreach my $subdir (@{$config->{all_media}{$run->{media}}}) { - my $rpms_dir = "$config->{repository}/$run->{distro}/$run->{my_arch}/media/$run->{media}/$subdir/"; - plog("checking current packages in $rpms_dir"); - opendir my $rpmdir, $rpms_dir or die "Could not open $rpms_dir: $!"; - my $urpmi = $run->{urpmi}; - foreach my $rpm (readdir $rpmdir) { - my ($rarch, $srpm) = $urpmi->update_srpm($rpms_dir, $rpm, $wrong_rpm); - $rarch or next; - $cache->{queue}{$srpm} = 1; - $run{status}{$srpm} = 'ok'; - check_version($run, $srpm, $srpm_version); - } - closedir $rpmdir; + if (!$run->{build_all}) { + foreach my $subdir (@{$config->{all_media}{$run->{media}}}) { + my $rpms_dir = "$config->{repository}/$run->{distro}/$run->{my_arch}/media/$run->{media}/$subdir/"; + plog("checking current packages in $rpms_dir"); + opendir my $rpmdir, $rpms_dir or die "Could not open $rpms_dir: $!"; + my $urpmi = $run->{urpmi}; + foreach my $rpm (readdir $rpmdir) { + my ($rarch, $srpm) = $urpmi->update_srpm($rpms_dir, $rpm, $wrong_rpm); + $rarch or next; + $cache->{queue}{$srpm} = 1; + $run{status}{$srpm} = 'ok'; + check_version($run, $srpm, $srpm_version); + } + closedir $rpmdir; + } } foreach my $m (keys %{$config->{all_media}}) { |