added more many_to_many tests and changed add_to_rel to accept linking table column...
[dbsrgits/DBIx-Class-Historic.git] / t / testlib / MyStarLinkMCPK.pm
CommitLineData
c6d74d3e 1package # hide from PAUSE
2 MyStarLinkMCPK;
ea2e61bf 3
4BEGIN { unshift @INC, './t/testlib'; }
5use base 'MyBase';
6
7use MyStar;
8use MyFilm;
9
10use strict;
11
12# This is a many-to-many mapping table that uses the two foreign keys
13# as its own primary key - there's no extra 'auto-inc' column here
14
15__PACKAGE__->set_table();
16__PACKAGE__->columns(Primary => qw/film star/);
17__PACKAGE__->columns(All => qw/film star/);
18__PACKAGE__->has_a(film => 'MyFilm');
19__PACKAGE__->has_a(star => 'MyStar');
20
21sub create_sql {
22 return qq{
23 film INTEGER NOT NULL,
24 star INTEGER NOT NULL,
25 PRIMARY KEY (film, star)
26 };
27}
28
291;
30