]>
Dogcows Code - chaz/p5-DBIx-Class-ResultSet-RecursiveUpdate/blob - t/lib/DBICTest/Schema/TwoKeys.pm
1 package # hide from PAUSE
2 DBICTest
::Schema
::TwoKeys
;
4 use base
'DBIx::Class::Core';
6 __PACKAGE__-
>table('twokeys');
7 __PACKAGE__-
>add_columns(
8 'artist' => { data_type
=> 'integer' },
9 'cd' => { data_type
=> 'integer' },
11 __PACKAGE__-
>set_primary_key(qw
/artist cd/);
13 __PACKAGE__-
>belongs_to(
14 artist
=> 'DBICTest::Schema::Artist',
15 {'foreign.artistid'=>'self.artist'},
18 __PACKAGE__-
>belongs_to( cd
=> 'DBICTest::Schema::CD', undef, { is_deferrable
=> 0, add_fk_index
=> 0 } );
20 __PACKAGE__-
>has_many(
21 'fourkeys_to_twokeys', 'DBICTest::Schema::FourKeys_to_TwoKeys', {
22 'foreign.t_artist' => 'self.artist',
23 'foreign.t_cd' => 'self.cd',
26 __PACKAGE__-
>many_to_many(
27 'fourkeys', 'fourkeys_to_twokeys', 'fourkeys',
This page took 0.036672 seconds and 4 git commands to generate.