X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F96_is_deteministic_value.t;h=d71886ba600d9c8700b2daa8bbce1a7f8d2be641;hb=592fa86fab66a8c2d89b7aa45b958be2842f2805;hp=840a1c5906789a6593539bed438a620d37903a8a;hpb=68de943862f06cabd397d2e74d12cd9cdc999779;p=dbsrgits%2FDBIx-Class.git diff --git a/t/96_is_deteministic_value.t b/t/96_is_deteministic_value.t index 840a1c5..d71886b 100644 --- a/t/96_is_deteministic_value.t +++ b/t/96_is_deteministic_value.t @@ -4,15 +4,15 @@ use warnings; use Test::More; use Test::Exception; +use lib qw(t/lib); +use DBICTest; + 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'); } -use lib qw(t/lib); -use DBICTest; - my $schema = DBICTest->init_schema(); my $artist_rs = $schema->resultset('Artist'); my $cd_rs = $schema->resultset('CD'); @@ -58,7 +58,7 @@ my $cd_rs = $schema->resultset('CD'); { 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);