r24110@martha (orig r992): t0m | 2008-11-26 15:37:59 -0500
[catagits/Reaction.git] / t / lib / RTest / TestDB / FooBaz.pm
1 package # hide from PAUSE
2   RTest::TestDB::FooBaz;
3
4 use base qw/DBIx::Class::Core/;
5 use metaclass 'Reaction::Meta::Class';
6 use Moose;
7
8 __PACKAGE__->table('foo_baz');
9
10 __PACKAGE__->add_columns(
11   foo => { data_type => 'integer', size => 16 },
12   baz => { data_type => 'integer', size => 16 },
13 );
14
15 __PACKAGE__->set_primary_key(qw/foo baz/);
16
17 __PACKAGE__->belongs_to('foo' => 'RTest::TestDB::Foo');
18 __PACKAGE__->belongs_to('baz' => 'RTest::TestDB::Baz');
19
20 __PACKAGE__->meta->make_immutable(inline_constructor => 0);
21
22 1;