diff options
| author | Francois Pons <fpons@mandriva.com> | 2002-07-25 17:30:32 +0000 |
|---|---|---|
| committer | Francois Pons <fpons@mandriva.com> | 2002-07-25 17:30:32 +0000 |
| commit | de4fd80d4311332df639c63cc7fd1b4f85d0d7fe (patch) | |
| tree | f22941e5eed730036031697f42a7d98a521afa45 /perl-install | |
| parent | 4e73cd4e6bbf81776c8b10e8f035d84bdd9632bc (diff) | |
| download | drakx-de4fd80d4311332df639c63cc7fd1b4f85d0d7fe.tar drakx-de4fd80d4311332df639c63cc7fd1b4f85d0d7fe.tar.gz drakx-de4fd80d4311332df639c63cc7fd1b4f85d0d7fe.tar.bz2 drakx-de4fd80d4311332df639c63cc7fd1b4f85d0d7fe.tar.xz drakx-de4fd80d4311332df639c63cc7fd1b4f85d0d7fe.zip | |
small code changes for upgrade.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/pkgs.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index e046ab6eb..10c933e3c 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -786,8 +786,9 @@ sub selectPackagesToUpgrade { my $state = $packages->{state} ||= {}; $state->{selected} = {}; - $packages->resolve_requested($packages->{rpmdb}, $state, - $packages->request_packages_to_upgrade($packages->{rpmdb}, $state, {}, requested => undef) || {}, + my %selection; + $packages->request_packages_to_upgrade($packages->{rpmdb}, $state, \%selection, requested => undef); + $packages->resolve_requested($packages->{rpmdb}, $state, \%selection, callback_choices => \&packageCallbackChoices); } |