diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-04-24 19:00:12 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-04-24 19:00:12 +0000 |
commit | 73c851144720e28b21a491b6250385170db9d752 (patch) | |
tree | dcc9fae4302b3d083ad7cc7a808e5d17f970bb8c /perl-install/timezone.pm | |
parent | 0dc3338257439d2265c1eb13c3a66c9431c88cb5 (diff) | |
download | drakx-73c851144720e28b21a491b6250385170db9d752.tar drakx-73c851144720e28b21a491b6250385170db9d752.tar.gz drakx-73c851144720e28b21a491b6250385170db9d752.tar.bz2 drakx-73c851144720e28b21a491b6250385170db9d752.tar.xz drakx-73c851144720e28b21a491b6250385170db9d752.zip |
perl_checker adaptations + fixes
Diffstat (limited to 'perl-install/timezone.pm')
-rw-r--r-- | perl-install/timezone.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/timezone.pm b/perl-install/timezone.pm index 84c4d685f..dbce11f8d 100644 --- a/perl-install/timezone.pm +++ b/perl-install/timezone.pm @@ -16,7 +16,7 @@ sub getTimeZones { sort @l; } -sub read { +sub read() { my %t = getVarsFromSh("$::prefix/etc/sysconfig/clock") or return {}; { timezone => $t{ZONE}, UTC => text2bool($t{UTC}) }; } @@ -127,7 +127,7 @@ sub fuzzyChoice { } sub bestTimezone { $c2t{fuzzyChoice($_[0])} || 'GMT' } -sub ntp_servers { +sub ntp_servers() { q(Australia (ntp.adelaide.edu.au) Australia (ntp.saard.net) Australia (time.esec.com.au) |