summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/install_steps.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index a7323789b..ec8aa819b 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -328,7 +328,11 @@ sub pkg_install_if_requires_satisfied {
my %newSelection;
my $pkg = pkgs::packageByName($o->{packages}, $_) || die "$_ rpm not found";
pkgs::selectPackage($o->{packages}, $pkg, 0, \%newSelection);
- scalar(keys %newSelection) == 1 and pkgs::selectPackage($o->{packages}, $pkg);
+ if (scalar(keys %newSelection) == 1) {
+ pkgs::selectPackage($o->{packages}, $pkg);
+ } else {
+ log::l("pkg_install_if_requires_satisfied: not selecting $_ because of ", join(", ", keys %newSelection));
+ }
}
$o->installPackages;
}