From: Wallace Reis <wreis@cpan.org>
Date: Sat, 1 Nov 2008 00:42:56 +0000 (+0000)
Subject: added failing test case for multi create
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7b7b6c88cd90e22e52c6c13fb8a94fc0c83f9ca2;p=dbsrgits%2FDBIx-Class-Historic.git

added failing test case for multi create
---

diff --git a/t/96multi_create.t b/t/96multi_create.t
index 8242908..c8957de 100644
--- a/t/96multi_create.t
+++ b/t/96multi_create.t
@@ -20,11 +20,16 @@ my $artist = $schema->resultset('Artist')->create({ name => 'Fred 2',
                                                      cds => [
                                                              { title => 'Music to code by',
                                                                year => 2007,
+                                                               tags => [
+                                                                 { 'tag' => 'rock' },
+                                                                 { 'tag' => 'pop' },
+                                                               ],
                                                              },
                                                              ],
                                                      });
 is(ref $artist->cds->first, 'DBICTest::CD', 'Created Artist with CDs');
 is($artist->cds->first->title, 'Music to code by', 'CD created correctly');
+is($artist->cds->first->tags->count, 2, 'Correct tags count');
 
 # Add a new CD
 $artist->update({cds => [ $artist->cds,