my $schema = DBICTest->init_schema();
-plan tests => 11;
+plan tests => 17;
my $cd2 = $schema->resultset('CD')->create({ artist =>
{ name => 'Fred Bloggs' },
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 => [
});
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;