1 package # hide from PAUSE
2 DBICTest::Schema::FourKeys;
7 use base qw/DBICTest::BaseResult/;
9 __PACKAGE__->table('fourkeys');
10 __PACKAGE__->add_columns(
11 'foo' => { data_type => 'integer' },
12 'bar' => { data_type => 'integer' },
13 'hello' => { data_type => 'integer' },
14 'goodbye' => { data_type => 'integer' },
15 'sensors' => { data_type => 'character', size => 10 },
16 'read_count' => { data_type => 'int', is_nullable => 1 },
18 __PACKAGE__->set_primary_key(qw/foo bar hello goodbye/);
20 __PACKAGE__->has_many(
21 'fourkeys_to_twokeys', 'DBICTest::Schema::FourKeys_to_TwoKeys', {
22 'foreign.f_foo' => 'self.foo',
23 'foreign.f_bar' => 'self.bar',
24 'foreign.f_hello' => 'self.hello',
25 'foreign.f_goodbye' => 'self.goodbye',
28 __PACKAGE__->many_to_many(
29 'twokeys', 'fourkeys_to_twokeys', 'twokeys',