summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm8
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;
}
}