From 99c9b0680ce235c7e5bb6d18a8154a147e70947c Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Tue, 28 Sep 1999 15:53:43 +0000
Subject: *** empty log message ***

---
 perl-install/timezone.pm | 7 +++++++
 1 file changed, 7 insertions(+)

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

diff --git a/perl-install/timezone.pm b/perl-install/timezone.pm
index 6330cb325..e5851b1dd 100644
--- a/perl-install/timezone.pm
+++ b/perl-install/timezone.pm
@@ -17,6 +17,13 @@ sub getTimeZones {
     @l;
 }
 
+sub read ($) {
+    my ($f) = @_;
+    my %t = getVarsFromSh($f) or die "cannot open file $f: $!";
+
+    ("timezone", $t{ZONE}, "GMT", text2bool($t{GMT}));
+}
+
 sub write($$$) {
     my ($prefix, $t, $f) = @_;
 
-- 
cgit v1.2.1