Blob Blame History Raw
use warnings;
use strict;

use Test::More tests => 2;

require_ok "DateTime::TimeZone::Tzfile";

# This tests for proper binary mode handling of tzfiles.  Specifically,
# if a tzfile is read in text mode then it may get mangled by translation
# of CRLF to LF.  This file happens to contain a byte
# sequence that would be interpreted as CRLF in text mode.
my $tz = DateTime::TimeZone::Tzfile->new("t/");
ok 1;