X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F66relationship.t;h=a6fc4049d124691a3219fd2606fe1c0f4bcbb5be;hb=c49fcf72f1166614c95811743b72cc6d3c23930a;hp=798e6600cc9403e4d16ed531d4b6b059c19dbc53;hpb=f4db5947795f080d87afa7c598b54b238143bb3f;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/66relationship.t b/t/66relationship.t index 798e660..a6fc404 100644 --- a/t/66relationship.t +++ b/t/66relationship.t @@ -8,7 +8,7 @@ use DBICTest; my $schema = DBICTest->init_schema(); -plan tests => 70; +plan tests => 71; # has_a test my $cd = $schema->resultset("CD")->find(4); @@ -35,10 +35,11 @@ is( $cds[1]->title, 'Forkful of bees', 'search_related with abstract query ok' ) if ($INC{'DBICTest/HelperRels.pm'}) { $artist->add_to_cds({ title => 'Big Flop', year => 2005 }); } else { - $artist->create_related( 'cds', { + my $big_flop = $artist->create_related( 'cds', { title => 'Big Flop', year => 2005, } ); + lives_ok { $big_flop->genre} "Don't throw exception when col is not loaded after insert"; } my $big_flop_cd = ($artist->search_related('cds'))[3];