diff options
Diffstat (limited to 'perl-install/timezone.pm')
| -rw-r--r-- | perl-install/timezone.pm | 7 |
1 files changed, 7 insertions, 0 deletions
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) = @_; |