From 2a6d5cf8e0a163872f3277b0cb2e75ae786e0c48 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 8 Aug 2002 16:27:24 +0000 Subject: (tvout): rough default value for PAL vs NTSC --- perl-install/Xconfig/various.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/perl-install/Xconfig/various.pm b/perl-install/Xconfig/various.pm index 45b2c256e..9b9a43804 100644 --- a/perl-install/Xconfig/various.pm +++ b/perl-install/Xconfig/various.pm @@ -76,8 +76,12 @@ For this you have to plug your graphic card to your TV before booting your compu Then choose the \"TVout\" entry in the bootloader Do you have this feature?")) or return; + + #- rough default value (rationale: http://download.nvidia.com/XFree86_40/1.0-2960/README.txt) + require timezone; + my $norm = timezone::read()->{timezone} =~ /America/ ? 'NTSC' : 'PAL'; - my $norm = $in->ask_from_list('', _("What norm is your TV using?"), [ 'NTSC', 'PAL' ]) or return; + $norm = $in->ask_from_list('', _("What norm is your TV using?"), [ 'NTSC', 'PAL' ], $norm) or return; configure_FB_TVOUT({ norm => $norm }); } -- cgit v1.2.1