diff options
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index da92d7f51..53e4cc0b3 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -592,7 +592,7 @@ sub load_rate_files { } sub setPackages { - my ($o, $rebuild_needed) = @_; + my ($o) = @_; require pkgs; if (!$o->{packages} || is_empty_array_ref($o->{packages}{depslist})) { @@ -600,8 +600,8 @@ sub setPackages { 1 while $suppl_method = $o->selectSupplMedia($suppl_method); - #- open rpm db according to right mode needed. - $o->{packages}{rpmdb} ||= pkgs::rpmDbOpen($rebuild_needed); + #- open rpm db according to right mode needed (ie rebuilding database if upgrading) + $o->{packages}{rpmdb} ||= pkgs::rpmDbOpen($o->{isUpgrade}); #- always try to select basic kernel (else on upgrade, kernel will never be updated provided a kernel is already #- installed and provides what is necessary). |