From 1defcba73b989b6a28826c563417a7c0fc251052 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 30 Aug 1999 18:50:40 +0000
Subject: no_comment

---
 perl-install/install_steps.pm | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

(limited to 'perl-install/install_steps.pm')

diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index 622d14dc9..ce96047e6 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -82,6 +82,9 @@ sub errorInStep($$) {}
 sub chooseLanguage($) {
     $o->default("lang");
 }
+sub chooseKeyboard($) {
+    $o->default("keyboard");
+}
 sub selectInstallOrUpgrade($) {
     $o->default("isUpgrade") || 0;
 }
@@ -165,7 +168,17 @@ sub configureNetwork($) {
     #res_init();		# reinit the resolver so DNS changes take affect     
 }
 
-sub timeConfig {}
+sub timeConfig {
+    my ($o, $f) = @_;
+    my $t = $o->default("timezone");
+
+    setVarsInSh($f, { 
+	ZONE => $t->{timezone},
+	GMT  => bool2text($t->{GMT}),
+	ARC  => "false",
+    });
+}
+
 sub servicesConfig {}
 sub printerConfig {}
 
-- 
cgit v1.2.1