summaryrefslogtreecommitdiffstats
path: root/perl-install/timezone.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-08-08 16:28:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-08-08 16:28:43 +0000
commitfe435d0ab171cf1b928476964526965638123cd2 (patch)
tree6c160715066e7cc84e1c0b1410c749e059fb7e41 /perl-install/timezone.pm
parent2a6d5cf8e0a163872f3277b0cb2e75ae786e0c48 (diff)
downloaddrakx-backup-do-not-use-fe435d0ab171cf1b928476964526965638123cd2.tar
drakx-backup-do-not-use-fe435d0ab171cf1b928476964526965638123cd2.tar.gz
drakx-backup-do-not-use-fe435d0ab171cf1b928476964526965638123cd2.tar.bz2
drakx-backup-do-not-use-fe435d0ab171cf1b928476964526965638123cd2.tar.xz
drakx-backup-do-not-use-fe435d0ab171cf1b928476964526965638123cd2.zip
use $::prefix in timezone::read
Diffstat (limited to 'perl-install/timezone.pm')
-rw-r--r--perl-install/timezone.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/timezone.pm b/perl-install/timezone.pm
index 3eb4fafe8..ad79cdb6b 100644
--- a/perl-install/timezone.pm
+++ b/perl-install/timezone.pm
@@ -18,8 +18,7 @@ sub getTimeZones {
}
sub read {
- my ($prefix) = @_;
- my %t = getVarsFromSh("$prefix/etc/sysconfig/clock") or return {};
+ my %t = getVarsFromSh("$::prefix/etc/sysconfig/clock") or return {};
{ timezone => $t{ZONE}, UTC => text2bool($t{UTC}) };
}