summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2006-02-28 17:32:18 +0000
committerOlivier Blin <oblin@mandriva.org>2006-02-28 17:32:18 +0000
commit305e8718e9c1018d63139de7d9673a43244d96d6 (patch)
tree9605d3afb6ac211cae99b9d5a656ad2588e0e0cf /perl-install/standalone
parent3059ff9a6e8cfa69ed1ddceef47c6e7f29bdb2b9 (diff)
downloaddrakx-305e8718e9c1018d63139de7d9673a43244d96d6.tar
drakx-305e8718e9c1018d63139de7d9673a43244d96d6.tar.gz
drakx-305e8718e9c1018d63139de7d9673a43244d96d6.tar.bz2
drakx-305e8718e9c1018d63139de7d9673a43244d96d6.tar.xz
drakx-305e8718e9c1018d63139de7d9673a43244d96d6.zip
ask for timezone (#21271)
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/finish-install10
1 files changed, 10 insertions, 0 deletions
diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install
index c44b73cc7..15f615267 100755
--- a/perl-install/standalone/finish-install
+++ b/perl-install/standalone/finish-install
@@ -49,6 +49,15 @@ sub ask_keyboard() {
keyboard::configure_and_set_standalone($keyboard);
}
+sub ask_timezone() {
+ require timezone;
+ my $t = {};
+ $t->{timezone} = timezone::bestTimezone($locale->{country});
+ $t->{timezone} = $in->ask_from_treelist(N("Timezone"), N("Which is your timezone?"), '/', [ timezone::getTimeZones() ], $t->{timezone}) or return;
+ $t->{UTC} = $in->ask_yesorno(N("Timezone"), N("Is your hardware clock set to GMT?"), $t->{UTC});
+ timezone::write($t);
+}
+
sub ask_network() {
my $modules_conf = modules::any_conf->read;
require network::netconnect;
@@ -101,6 +110,7 @@ sub call {
call('license');
call('language');
call('keyboard');
+call('timezone');
call('network');
if (defined $::WizardWindow) {
$::WizardWindow->destroy;