Commit | Line | Data |
3fea05b9 |
1 | # This file is auto-generated by the Perl DateTime Suite time zone |
2 | # code generator (0.07) This code generator comes with the |
3 | # DateTime::TimeZone module distribution in the tools/ directory |
4 | |
5 | # |
6 | # Generated from /tmp/UeJBI4pKMW/australasia. Olson data version 2009s |
7 | # |
8 | # Do not edit this file directly. |
9 | # |
10 | package DateTime::TimeZone::Pacific::Johnston; |
11 | |
12 | use strict; |
13 | |
14 | use Class::Singleton; |
15 | use DateTime::TimeZone; |
16 | use DateTime::TimeZone::OlsonDB; |
17 | |
18 | @DateTime::TimeZone::Pacific::Johnston::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' ); |
19 | |
20 | my $spans = |
21 | [ |
22 | [ |
23 | DateTime::TimeZone::NEG_INFINITY, |
24 | DateTime::TimeZone::INFINITY, |
25 | DateTime::TimeZone::NEG_INFINITY, |
26 | DateTime::TimeZone::INFINITY, |
27 | -36000, |
28 | 0, |
29 | 'HST' |
30 | ], |
31 | ]; |
32 | |
33 | sub olson_version { '2009s' } |
34 | |
35 | sub has_dst_changes { 0 } |
36 | |
37 | sub _max_year { 2019 } |
38 | |
39 | sub _new_instance |
40 | { |
41 | return shift->_init( @_, spans => $spans ); |
42 | } |
43 | |
44 | |
45 | |
46 | 1; |
47 | |