From: Peter Rabbitson Date: Tue, 2 Mar 2010 10:09:06 +0000 (+0000) Subject: This test is identical to the one above it X-Git-Tag: v0.08121~94 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c3bc66c837f3afaf86f00ae31d62e46476453baa;p=dbsrgits%2FDBIx-Class.git This test is identical to the one above it --- diff --git a/t/multi_create/in_memory.t b/t/multi_create/in_memory.t index 9b905eb..e5c888b 100644 --- a/t/multi_create/in_memory.t +++ b/t/multi_create/in_memory.t @@ -46,17 +46,6 @@ my $schema = DBICTest->init_schema(); } { - my $new_artist = $schema->resultset("Artist")->new_result({ 'name' => 'Depeche Mode 2: Insertion Boogaloo' }); - my $new_related_cd = $new_artist->new_related('cds', { 'title' => 'Leave Loudly While Singing Off Key', 'year' => 1982}); - eval { - $new_related_cd->insert; - }; - is ($@, '', 'CD insertion survives by inserting artist'); - ok($new_artist->in_storage, 'artist inserted'); - ok($new_related_cd->in_storage, 'new_related_cd inserted'); -} - -{ my $new_cd = $schema->resultset("CD")->new_result({}); my $new_related_artist = $new_cd->new_related('artist', { 'name' => 'Marillion',}); lives_ok (