summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-07-03 11:10:31 +0000
committerFrancois Pons <fpons@mandriva.com>2001-07-03 11:10:31 +0000
commit32a64c55b6780490d44e03123ca575deb10fc1f9 (patch)
tree8c375a10b3f3c2b2fe469c7480644d4dc64c7e3d /perl-install
parenta33a610b1f75a6ca3f3a63da5e01e031a311c302 (diff)
downloaddrakx-32a64c55b6780490d44e03123ca575deb10fc1f9.tar
drakx-32a64c55b6780490d44e03123ca575deb10fc1f9.tar.gz
drakx-32a64c55b6780490d44e03123ca575deb10fc1f9.tar.bz2
drakx-32a64c55b6780490d44e03123ca575deb10fc1f9.tar.xz
drakx-32a64c55b6780490d44e03123ca575deb10fc1f9.zip
added improve choice of package, well not very usefull but asked by higher
people :-)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_gtk.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index da7133d96..ff632debe 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -395,6 +395,7 @@ sub choosePackagesTree {
} else {
foreach my $root (@{$o->{compssUsersSorted}}) {
my (%fl, @firstchoice, @others);
+ #$fl{$_} = $o->{compssUsersChoice}{$_} foreach @{$o->{compssUsers}{$root}{flags}}; #- FEATURE:improve choce of packages...
$fl{$_} = 1 foreach @{$o->{compssUsers}{$root}{flags}};
foreach my $p (values %{$packages->{names}}) {
my ($rate, @flags) = pkgs::packageRateRFlags($p);