Documentation updates:
[dbsrgits/DBIx-Class-Historic.git] / t / testlib / MyStarLink.pm
CommitLineData
c6d74d3e 1package # hide from PAUSE
2 MyStarLink;
ea2e61bf 3
4BEGIN { unshift @INC, './t/testlib'; }
5use base 'MyBase';
6
7use strict;
8
9__PACKAGE__->set_table();
10__PACKAGE__->columns(All => qw/linkid film star/);
11__PACKAGE__->has_a(film => 'MyFilm');
12__PACKAGE__->has_a(star => 'MyStar');
13
14sub create_sql {
15 return qq{
16 linkid TINYINT NOT NULL AUTO_INCREMENT PRIMARY KEY,
17 film TINYINT NOT NULL,
18 star TINYINT NOT NULL
19 };
20}
21
221;
23