diff options
| -rw-r--r-- | perl-install/pkgs.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index c0df1ba8c..e14a709c6 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -955,12 +955,15 @@ sub cleanOldRpmDb { sub selectPackagesAlreadyInstalled { my ($packages, $prefix) = @_; + log::l("computing installed flags only"); $packages->compute_installed_flags($packages->{rpmdb}); } sub selectPackagesToUpgrade { my ($packages, $prefix, $base, $toRemove, $toSave) = @_; + log::l("selecting packages to upgrade"); + my $state = $packages->{state} ||= {}; $state->{selected} = {}; $state->{requested} = {}; |