package DateTime::TimeZone::America::Coral_Harbour;
use strict;
use Class::Singleton;
use DateTime::TimeZone;
use DateTime::TimeZone::OlsonDB;
@DateTime::TimeZone::America::Coral_Harbour::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' );
my $spans =
[
[
DateTime::TimeZone::NEG_INFINITY,
59421792760,
DateTime::TimeZone::NEG_INFINITY,
59421772800,
-19960,
0,
'LMT'
],
[
59421792760,
60503612400,
59421774760,
60503594400,
-18000,
0,
'ET'
],
[
60503612400,
60520543200,
60503598000,
60520528800,
-14400,
1,
'EDT'
],
[
60520543200,
60538690800,
60520525200,
60538672800,
-18000,
0,
'EST'
],
[
60538690800,
60552504000,
60538676400,
60552489600,
-14400,
1,
'EDT'
],
[
60552504000,
61255465200,
60552486000,
61255447200,
-18000,
0,
'EST'
],
[
61255465200,
61366287600,
61255450800,
61366273200,
-14400,
1,
'EWT'
],
[
61366287600,
61370287200,
61366273200,
61370272800,
-14400,
1,
'EPT'
],
[
61370287200,
61378318800,
61370269200,
61378300800,
-18000,
0,
'EST'
],
[
61378318800,
DateTime::TimeZone::INFINITY,
61378336800,
DateTime::TimeZone::INFINITY,
-18000,
0,
'EST'
],
];
sub has_dst_changes { 4 }
sub _max_year { 2016 }
sub _new_instance
{
return shift->_init( @_, spans => $spans );
}
1;