[Bast-commits] r8844 - DBIx-Class/0.08/trunk/t/multi_create

ribasushi at dev.catalyst.perl.org ribasushi at dev.catalyst.perl.org
Tue Mar 2 10:09:06 GMT 2010


Author: ribasushi
Date: 2010-03-02 10:09:06 +0000 (Tue, 02 Mar 2010)
New Revision: 8844

Modified:
   DBIx-Class/0.08/trunk/t/multi_create/in_memory.t
Log:
This test is identical to the one above it

Modified: DBIx-Class/0.08/trunk/t/multi_create/in_memory.t
===================================================================
--- DBIx-Class/0.08/trunk/t/multi_create/in_memory.t	2010-03-02 09:29:18 UTC (rev 8843)
+++ DBIx-Class/0.08/trunk/t/multi_create/in_memory.t	2010-03-02 10:09:06 UTC (rev 8844)
@@ -46,17 +46,6 @@
 }
 
 {
-    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 (




More information about the Bast-commits mailing list