Commit | Line | Data |
---|---|---|
a02675cd | 1 | package DBICTest::TwoKeys; |
2 | ||
3 | use base 'DBIx::Class::Core'; | |
4 | ||
5 | DBICTest::TwoKeys->table('twokeys'); | |
6 | DBICTest::TwoKeys->add_columns(qw/artist cd/); | |
7 | DBICTest::TwoKeys->set_primary_key(qw/artist cd/); | |
8 | DBICTest::TwoKeys->add_relationship( | |
9 | artist => 'DBICTest::Artist', | |
10 | { 'foreign.artistid' => 'self.artist' } | |
11 | ); | |
12 | DBICTest::TwoKeys->add_relationship( | |
13 | cd => 'DBICTest::CD', | |
14 | { 'foreign.cdid' => 'self.cd' } | |
15 | ); | |
16 | ||
17 | 1; |