diff options
Diffstat (limited to 'perl-install/install_steps.pm')
| -rw-r--r-- | perl-install/install_steps.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 55dbf6849..11abcb06c 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -302,7 +302,11 @@ sub pkg_install { my ($o, @l) = @_; log::l("selecting packages"); require pkgs; - pkgs::selectPackage($o->{packages}, pkgs::packageByName($o->{packages}, $_) || die "$_ rpm not found") foreach @l; + if ($::testing) { + log::l("selecting package \"$_\"") foreach @l; + } else { + pkgs::selectPackage($o->{packages}, pkgs::packageByName($o->{packages}, $_) || die "$_ rpm not found") foreach @l; + } my @toInstall = pkgs::packagesToInstall($o->{packages}); if (@toInstall) { log::l("installing packages"); |