1 Description: use tzfiles from tzdata package
2 Origin: vendor
3 Forwarded: not-needed
4 Author: gregor herrmann <gregoa@debian.org>
5 Last-Update: 2012-12-22
7 --- a/lib/Time/OlsonTZ/Data.pm
8 +++ b/lib/Time/OlsonTZ/Data.pm
9 @@ -42,6 +42,7 @@
10 { use 5.006; }
11 use warnings;
12 use strict;
13 +use File::Spec;
15 our $VERSION = "0.201210";
17 @@ -58,7 +59,6 @@
18 sub _data_file($) {
19 my($upath) = @_;
20 unless(defined $datadir) {
21 - require File::Spec;
22 ($datavol, $datadir, undef) =
23 File::Spec->splitpath($INC{"Time/OlsonTZ/Data.pm"});
24 }
25 @@ -530,7 +530,7 @@
26 Carp::croak("no such timezone `$tzname' ".
27 "in the Olson @{[olson_version]} database");
28 }
29 - return _data_file($tzname.".tz");
30 + return File::Spec->catfile('/usr/share/zoneinfo', $tzname);
31 }
33 =back
