From 44681afa40d50c3abed186ba405ee6a1aaeeb739 Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 21 Apr 2000 13:47:13 +0000
Subject: *** empty log message ***

---
 perl-install/pkgs.pm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perl-install/pkgs.pm')

diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 605dcb86e..1c2125b1a 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -589,6 +589,8 @@ sub setSelectedFromCompssList {
 	my @values = map { $_->{values}[$ind] + (packageFlagUnskip($_) && packageName($_) !~ /^k/ ? 10 : 0) } @packages;
 	sort { $values[$b] <=> $values[$a] } 0 .. $#packages;
     };
+    #- select at least 25 for beginner installation.
+    $min_level < 25 && $::beginner and $min_level = 25;
     foreach (@places) {
 	my $p = $packages[$_];
 	next if packageFlagSkip($p);
-- 
cgit v1.2.1