summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-02-18 10:56:07 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-02-18 10:56:07 +0000
commitdda88c87469bf52b97c22bd5c19b54202a7e1e67 (patch)
treee9472f2fc74bd86dd6171ab3b7a21533b262dc64 /perl-install
parent76b5d2e2a32fc371714ba421fac9d345c7807341 (diff)
downloaddrakx-backup-do-not-use-dda88c87469bf52b97c22bd5c19b54202a7e1e67.tar
drakx-backup-do-not-use-dda88c87469bf52b97c22bd5c19b54202a7e1e67.tar.gz
drakx-backup-do-not-use-dda88c87469bf52b97c22bd5c19b54202a7e1e67.tar.bz2
drakx-backup-do-not-use-dda88c87469bf52b97c22bd5c19b54202a7e1e67.tar.xz
drakx-backup-do-not-use-dda88c87469bf52b97c22bd5c19b54202a7e1e67.zip
when cancel is pressed, fix re-selecting unselected packages
(callback_choices unneeded, cf rpmdrake)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_gtk.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index 56be22ca5..259ed9550 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -395,8 +395,7 @@ sub choosePackagesTree {
$o->ask_warn('', $error) if $error;
#- disable selection (or unselection).
$isSelection ? $packages->disable_selected($packages->{rpmdb}, $state, @l) :
- $packages->resolve_requested($packages->{rpmdb}, $state, \%l,
- callback_choices => \&pkgs::packageCallbackChoices);
+ $packages->resolve_requested($packages->{rpmdb}, $state, { map { $_->id => 1 } @l });
} else {
#- keep the changes, update visible state.
foreach (@l) {