Blob Blame History Raw
use strict;
use warnings;

use Test::More 0.88;

use DateTime::Format::Builder;

# Does new() work properly?
{
    eval { DateTime::Format::Builder->new('fnar') };
    ok( ( $@ and $@ =~ /takes no param/ ), "Too many parameters exception" );

    my $obj = eval { DateTime::Format::Builder->new() };
    ok( !$@, "Created object" );
    isa_ok( $obj, 'DateTime::Format::Builder' );

    eval { $obj->parse_datetime("whenever") };
    ok( ( $@ and $@ =~ /No parser/ ), "No parser exception" );

}

done_testing();