X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F53delete_related.t;h=e0cfe127b5d5934b8060e9cb797a93fa7d610c97;hb=9c0df5f32b68e23c670c89ce6cdbff60b4bd0ed0;hp=f19356614e3f515bd6583c13740c98b0d93ef1c7;hpb=c6ce6ec6a7ffb98065ccf6e71fc0420e3a71d982;p=dbsrgits%2FDBIx-Class.git diff --git a/t/53delete_related.t b/t/53delete_related.t index f193566..e0cfe12 100644 --- a/t/53delete_related.t +++ b/t/53delete_related.t @@ -3,11 +3,10 @@ use strict; use warnings; use lib qw(t/lib); use DBICTest; -use DBICTest::BasicRels; plan tests => 7; -my $schema = DBICTest->schema; +my $schema = DBICTest->init_schema(); my $total_cds = $schema->resultset('CD')->count; cmp_ok($total_cds, '>', 0, 'need cd records'); @@ -28,3 +27,4 @@ cmp_ok($artist2_cds, '<', $total_cds, 'need more cds than related cds'); ok($artist2->delete_related('cds', {title => {like => '%'}})); cmp_ok($schema->resultset('CD')->count, '==', ($total_cds - $artist2_cds), 'too many cds were deleted'); +