# This file is auto-generated by the Perl DateTime Suite time zone # code generator (0.07) This code generator comes with the # DateTime::TimeZone module distribution in the tools/ directory # # Generated from /tmp/UWJ7kcRuTI/northamerica. Olson data version 1 # # Do not edit this file directly. # package DateTime::TimeZone::America::St_Lucia; use strict; use Class::Singleton; use DateTime::TimeZone; use DateTime::TimeZone::OlsonDB; @DateTime::TimeZone::America::St_Lucia::ISA = ( 'Class::Singleton', 'DateTime::TimeZone' ); my $spans = [ [ DateTime::TimeZone::NEG_INFINITY, 59611176240, DateTime::TimeZone::NEG_INFINITY, 59611161600, -14640, 0, 'LMT' ], [ 59611176240, 60305313840, 59611161600, 60305299200, -14640, 0, 'CMT' ], [ 60305313840, DateTime::TimeZone::INFINITY, 60305328240, DateTime::TimeZone::INFINITY, -14400, 0, 'AST' ], ]; sub has_dst_changes { 0 } sub _max_year { 2016 } sub _new_instance { return shift->_init( @_, spans => $spans ); } 1;