summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-11-28 15:11:16 +0000
committerFrancois Pons <fpons@mandriva.com>2000-11-28 15:11:16 +0000
commitaea1a43fb77b8b4c7cf9cc137b2629dd680666ed (patch)
tree161e6770a90fae215800e299ca8f3ede26a58560 /perl-install
parent798584fd3bbdeecd0d51c6eabbe913bd709f6f33 (diff)
downloaddrakx-backup-do-not-use-aea1a43fb77b8b4c7cf9cc137b2629dd680666ed.tar
drakx-backup-do-not-use-aea1a43fb77b8b4c7cf9cc137b2629dd680666ed.tar.gz
drakx-backup-do-not-use-aea1a43fb77b8b4c7cf9cc137b2629dd680666ed.tar.bz2
drakx-backup-do-not-use-aea1a43fb77b8b4c7cf9cc137b2629dd680666ed.tar.xz
drakx-backup-do-not-use-aea1a43fb77b8b4c7cf9cc137b2629dd680666ed.zip
modified def_mark to 59 (gl hw acceleration level) and upgrade use this level
for newbies so.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 46e13a0df..7f09c6a98 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -433,7 +433,7 @@ sub choosePackages {
$min_size < $availableC or die _("Your system has not enough space left for installation or upgrade (%d > %d)", $min_size, $availableC);
my $min_mark = $::beginner ? 25 : $::expert ? 0 : 1;
- my $def_mark = 50;
+ my $def_mark = 59; #- 59 is for packages that need gl hw acceleration.
my $b = pkgs::saveSelected($packages);
pkgs::setSelectedFromCompssList($o->{compssListLevels}, $packages, $def_mark, 0, $o->{installClass});
@@ -449,7 +449,7 @@ sub choosePackages {
if ($::beginner) {
if ($o->{isUpgrade}) {
- $min_size; #- already selected size with at least 80 for compssList level.
+ min($def_size, $max);
} else {
my (@l);
my @text = (__("Minimum (%dMB)"), __("Recommended (%dMB)"), __("Complete (%dMB)"));