diff options
| -rw-r--r-- | perl-install/Xconfig/various.pm | 6 |
1 files changed, 5 insertions, 1 deletions
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 }); } |