summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r--perl-install/install_steps.pm14
1 files changed, 14 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 2d1cd8aa1..92b622fa8 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -298,6 +298,20 @@ sub pkg_install {
$o->installPackages;
}
+sub pkg_install_if_requires_satisfied {
+ my ($o, @l) = @_;
+ require pkgs;
+ foreach (@l) {
+ my %newSelection;
+ my $pkg = pkgs::packageByName($o->{packages}, $_) || die "$_ rpm not found";
+ pkgs::selectPackage($o->{packages}, $pkg, 0, \%newSelection) foreach @l;
+ if (scalar(keys %newSelection) == 1) {
+ pkg::selectPackage($o->{packages}, $pkg);
+ }
+ }
+ $o->installPackages;
+}
+
sub installPackages($$) { #- complete REWORK, TODO and TOCHECK!
my ($o) = @_;
my $packages = $o->{packages};