diff options
| -rw-r--r-- | perl-install/pkgs.pm | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 6843a1a3b..7c859cb08 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -223,7 +223,6 @@ sub setSelectedFromCompssList($$$$$) { foreach (@places) { my $p = $packages[$_]; verif_lang($p, $lang) or next; - print "selecting $p->{name}\n"; &select($packages, $p); my $nb = 0; foreach (@packages) { @@ -231,13 +230,6 @@ sub setSelectedFromCompssList($$$$$) { } if ($nb > $size) { unselect($packages, $p, $nb - $size); - print "leaving auto selection (zsize was $nb > $size)\n"; - - my $nb = 0; foreach (@packages) { - $nb += $_->{size} if $_->{selected}; - } - print "leaving auto selection (zsize was $nb > $size)\n"; - last; } } |