plan tests => 8;
-my $label = $schema->resultset('Label')->find({ labelid => 1 });
+my $artist = $schema->resultset('Artist')->find(1);
# Check that you can leave off the alias
{
- my $existing_agent = $label->agents->find_or_create({
- name => 'Ted',
+ my $existing_cd = $artist->search_related('cds', undef, { prefetch => 'tracks' })->find_or_create({
+ title => 'Ted',
+ year => 2006,
});
- ok(! $existing_agent->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
- is($existing_agent->name, 'Ted', 'find_or_create on prefetched has_many with same column names: name matches existing entry');
+ ok(! $existing_cd->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
+ is($existing_cd->title, 'Ted', 'find_or_create on prefetched has_many with same column names: name matches existing entry');
- my $new_agent = $label->agents->find_or_create({
- name => 'Someone Else',
+ my $new_cd = $artist->search_related('cds', undef, { prefetch => 'tracks' })->find_or_create({
+ title => 'Something Else',
+ year => 2006,
});
- ok(! $new_agent->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
- is($new_agent->name, 'Someone Else', 'find_or_create on prefetched has_many with same column names: name matches');
+ ok(! $new_cd->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
+ is($new_cd->title, 'Something Else', 'find_or_create on prefetched has_many with same column names: title matches');
}
# Check that you can specify the alias
{
- my $existing_agent = $label->agents->find_or_create({
- 'me.name' => 'Someone Else',
+ my $existing_cd = $artist->search_related('cds', undef, { prefetch => 'tracks' })->find_or_create({
+ 'me.title' => 'Something Else',
+ 'me.year' => 2006,
});
- ok(! $existing_agent->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
- is($existing_agent->name, 'Someone Else', 'find_or_create on prefetched has_many with same column names: can be disambiguated with "me." for existing entry');
+ ok(! $existing_cd->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
+ is($existing_cd->title, 'Something Else', 'find_or_create on prefetched has_many with same column names: can be disambiguated with "me." for existing entry');
- my $new_agent = $label->agents->find_or_create({
- 'me.name' => 'Some New Guy',
+ my $new_cd = $artist->search_related('cds', undef, { prefetch => 'tracks' })->find_or_create({
+ 'me.title' => 'Some New Guy',
+ 'me.year' => 2006,
});
- ok(! $new_agent->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
- is($new_agent->name, 'Some New Guy', 'find_or_create on prefetched has_many with same column names: can be disambiguated with "me." for new entry');
+ ok(! $new_cd->is_changed, 'find_or_create on prefetched has_many with same column names: row is clean');
+ is($new_cd->title, 'Some New Guy', 'find_or_create on prefetched has_many with same column names: can be disambiguated with "me." for new entry');
}