X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F96multi_create.t;h=ac5f2195b708b7b6f09811fd36fb3abe3b985e4e;hb=fdb8385a961f14c3fd4ecf321c7ea6465066d306;hp=24b5d0f9e9f7a7bc0bd961a26c505290d518ff6e;hpb=3d8ee6abf96e514d1e555fb9a9b5a465c494f718;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/96multi_create.t b/t/96multi_create.t
index 24b5d0f..ac5f219 100644
--- a/t/96multi_create.t
+++ b/t/96multi_create.t
@@ -4,10 +4,11 @@ use warnings;
 use Test::More;
 use lib qw(t/lib);
 use DBICTest;
+use DateTime;
 
 my $schema = DBICTest->init_schema();
 
-plan tests => 11;
+plan tests => 17;
 
 my $cd2 = $schema->resultset('CD')->create({ artist => 
                                    { name => 'Fred Bloggs' },
@@ -89,10 +90,11 @@ CREATE_RELATED1 :{
 
 CREATE_RELATED2 :{
 
+	my $artist = $schema->resultset('Artist')->first;
 	
-	my $cd_result = $schema->resultset('Artist')->first->create_related('cds', {
+	my $cd_result = $artist->create_related('cds', {
 	
-		title => 'TestOneCD1',
+		title => 'TestOneCD2',
 		year => 2007,
 		tracks => [
 		
@@ -107,7 +109,7 @@ CREATE_RELATED2 :{
 	});
 	
 	ok( $cd_result && ref $cd_result eq 'DBICTest::CD', "Got Good CD Class");
-	ok( $cd_result->title eq "TestOneCD1", "Got Expected Title");
+	ok( $cd_result->title eq "TestOneCD2", "Got Expected Title");
 	
 	my $tracks = $cd_result->tracks;