From bee96c85712303c5b83a70263668abb69a8e11c9 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sun, 19 Jan 2014 23:28:01 +0100 Subject: fix detecting if basesystem is installed (mga#10722) thus fixing "basesystem package not selected" real cause might be some package flags not having been updated --- perl-install/install/install2.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/install/install2.pm') diff --git a/perl-install/install/install2.pm b/perl-install/install/install2.pm index 661f3d4a8..13661efb1 100644 --- a/perl-install/install/install2.pm +++ b/perl-install/install/install2.pm @@ -200,7 +200,8 @@ sub choosePackages { log::l("rpmsrate_flags_chosen's: ", join(' ', sort @flags)); #- check pre-condition that basesystem package must be selected. - install::pkgs::packageByName($o->{packages}, 'basesystem')->flag_available or die "basesystem package not selected"; + my $base_pkg = install::pkgs::packageByName($o->{packages}, 'basesystem'); + $base_pkg->flag_available or $base_pkg->flag_installed or die "basesystem package not selected"; #- check if there are packages that need installation. $o->{steps}{installPackages}{done} = 0 if $o->{steps}{installPackages}{done} && install::pkgs::packagesToInstall($o->{packages}) > 0; -- cgit v1.2.1