summaryrefslogtreecommitdiffstats
path: root/perl-install/install/steps_gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-09-29 11:06:13 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-09-29 11:06:13 +0000
commiteef67a1c9d9bf24315c326ddc67fee0cfb2ab525 (patch)
treee324f6198e5975fb30273a06fa6f617ef7129000 /perl-install/install/steps_gtk.pm
parentd6654de7b609f614efa1833e340b3f6009eb017b (diff)
downloaddrakx-backup-do-not-use-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar
drakx-backup-do-not-use-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar.gz
drakx-backup-do-not-use-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar.bz2
drakx-backup-do-not-use-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.tar.xz
drakx-backup-do-not-use-eef67a1c9d9bf24315c326ddc67fee0cfb2ab525.zip
- ask_deselect_media__copy_on_disk:
o do not select all media by default (eg: debug media) (nb: this dialog occurs when user chooses "Go back to media and packages selection" on pkg install error)
Diffstat (limited to 'perl-install/install/steps_gtk.pm')
-rw-r--r--perl-install/install/steps_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index 91967bccd..0b211221b 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -701,7 +701,7 @@ sub ask_deselect_media__copy_on_disk {
my ($_o, $hdlists, $o_copy_rpms_on_disk) = @_;
my @names = uniq(map { $_->{name} } @$hdlists);
- my %selection = map { $_ => 1 } @names;
+ my %selection = map { $_->{name} => $_->{selected} } @$hdlists;
if (@names > 1 || $o_copy_rpms_on_disk) {
my $w = ugtk2->new(N("Media Selection"));