use strict;
use warnings;
-# 6 tests
+use Test::More;
+use Test::Exception;
-use Test::More qw(no_plan);
use lib qw(t/lib);
use DBICTest;
-use DateTime;
-use DateTime::Format::Strptime;
-use Test::Exception;
+
+BEGIN {
+ require DBIx::Class;
+ plan skip_all => 'Test needs ' . DBIx::Class::Optional::Dependencies->req_missing_for ('test_dt')
+ unless DBIx::Class::Optional::Dependencies->req_ok_for ('test_dt');
+}
my $schema = DBICTest->init_schema();
my $artist_rs = $schema->resultset('Artist');
{
my $artist;
lives_ok {
- $artist = $artist_rs->search({ name => [ q/ some stupid names here/]})
+ $artist = $artist_rs->search({ name => [ qw(some stupid names here) ]})
->create({artistid => undef});
};
is($artist->name, undef);
}
-
-1;
+done_testing;