From 3467af25441cc4cf1510cf925f9916f64d43f50e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 8 Aug 2002 20:16:05 +0000 Subject: when prompting for VideoRam, default to the value obtained via DDC --- perl-install/Xconfig/card.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/Xconfig/card.pm') diff --git a/perl-install/Xconfig/card.pm b/perl-install/Xconfig/card.pm index f1eed7a0b..9387d9e74 100644 --- a/perl-install/Xconfig/card.pm +++ b/perl-install/Xconfig/card.pm @@ -254,8 +254,8 @@ sub configure_auto_install { $card->{prog} = install_server($card, $options, $do_pkgs); if ($card->{needVideoRam} && !$card->{VideoRam}) { - $card->{VideoRam} = 4096; - log::l("argh, I need to know VideoRam! Taking a default value: VideoRam = $card->{VideoRam}"); + $card->{VideoRam} = $options->{VideoRam_probed} || 4096; + log::l("argh, I need to know VideoRam! Taking " . ($options->{probed_VideoRam} ? "the probed" : "a default") . " value: VideoRam = $card->{VideoRam}"); } to_raw_X($card, $raw_X); $card; @@ -278,7 +278,7 @@ sub configure { $card->{prog} = install_server($card, $options, $do_pkgs); $in->ask_from('', _("Select the memory size of your graphics card"), - [ { val => \ ($card->{VideoRam} = 4096), + [ { val => \ ($card->{VideoRam} = $options->{VideoRam_probed} || 4096), type => 'list', list => [ ikeys %VideoRams ], format => sub { translate($VideoRams{$_[0]}) }, -- cgit v1.2.1