Fix building on perls with no . in @INC
[dbsrgits/DBIx-Class.git] / t / lib / DBICTest / DynamicForeignCols / Computer.pm
CommitLineData
38fe1ff9 1package DBICTest::DynamicForeignCols::Computer;
2
3use warnings;
4use strict;
5
6use base 'DBIx::Class::Core';
7
8__PACKAGE__->table('Computers');
9
10__PACKAGE__->add_columns('id');
11
12__PACKAGE__->set_primary_key('id');
13
14__PACKAGE__->has_many(computer_test_links => 'DBICTest::DynamicForeignCols::TestComputer', 'computer_id');
15
161;