diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-05 20:59:42 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-05 20:59:42 +0000 |
commit | 363aab7a71a0b505c780b763b22bcd5131995382 (patch) | |
tree | ec5940d21c5c321661d981e03a70ab388b183766 /perl-install/install_steps_gtk.pm | |
parent | c3de4c115afa51c96bdd3684644cae2176f015b4 (diff) | |
download | drakx-backup-do-not-use-363aab7a71a0b505c780b763b22bcd5131995382.tar drakx-backup-do-not-use-363aab7a71a0b505c780b763b22bcd5131995382.tar.gz drakx-backup-do-not-use-363aab7a71a0b505c780b763b22bcd5131995382.tar.bz2 drakx-backup-do-not-use-363aab7a71a0b505c780b763b22bcd5131995382.tar.xz drakx-backup-do-not-use-363aab7a71a0b505c780b763b22bcd5131995382.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index a96f9b151..5af96574b 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -439,6 +439,7 @@ sub choosePackagesTree { my ($leaf, $root) = @_; my $node = $tree->insert_node($parent->($root), undef, [$leaf, '', ''], 5, (undef) x 4, 1, 0); my $p = $packages->[0]{$leaf} or return; + $p->{medium}{selected} or return; my $pix = pkgs::packageFlagBase($p) ? $pix_base : pkgs::packageFlagSelected($p) ? $pix_selected : $pix_unselect; $tree->node_set_pixmap($node, 1, $pix->[0], $pix->[1]); push @{$ptree{$leaf}}, $node; |