diff options
author | Anne Nicolas <ennael@mageia.org> | 2014-01-20 09:44:32 +0100 |
---|---|---|
committer | Anne Nicolas <ennael@mageia.org> | 2014-01-20 09:44:32 +0100 |
commit | 2a943bf89881e5a4a405243774a8b7edfbb52675 (patch) | |
tree | f098a2e1e8aa9b15065ec27603539750375806a8 /perl-install/install/install2.pm | |
parent | e6fa9e69e67d7b0a74a04e90253f944ba5bf27b1 (diff) | |
parent | 4f2d23e7ff6a659d0ddc760dce2c0135481d029a (diff) | |
download | drakx-2a943bf89881e5a4a405243774a8b7edfbb52675.tar drakx-2a943bf89881e5a4a405243774a8b7edfbb52675.tar.gz drakx-2a943bf89881e5a4a405243774a8b7edfbb52675.tar.bz2 drakx-2a943bf89881e5a4a405243774a8b7edfbb52675.tar.xz drakx-2a943bf89881e5a4a405243774a8b7edfbb52675.zip |
Merge branch 'master' of git://git.mageia.org/software/drakx
Diffstat (limited to 'perl-install/install/install2.pm')
-rw-r--r-- | perl-install/install/install2.pm | 3 |
1 files changed, 2 insertions, 1 deletions
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; |