added more many_to_many tests and changed add_to_rel to accept linking table column...
[dbsrgits/DBIx-Class-Historic.git] / t / testlib / Film.pm
1 package # hide from PAUSE 
2     Film;
3
4 BEGIN { unshift @INC, './t/testlib'; }
5 use base 'DBIx::Class::Test::SQLite';
6 use strict;
7
8 __PACKAGE__->set_table('Movies');
9 __PACKAGE__->columns('Primary',   'Title');
10 __PACKAGE__->columns('Essential', qw( Title ));
11 __PACKAGE__->columns('Directors', qw( Director CoDirector ));
12 __PACKAGE__->columns('Other',     qw( Rating NumExplodingSheep HasVomit ));
13
14 sub create_sql {
15         return qq{
16                 title                   VARCHAR(255),
17                 director                VARCHAR(80),
18                 codirector              VARCHAR(80),
19                 rating                  CHAR(5),
20                 numexplodingsheep       INTEGER,
21                 hasvomit                CHAR(1)
22   }
23 }
24
25 sub create_test_film { 
26         return shift->create({
27                 Title             => 'Bad Taste',
28                 Director          => 'Peter Jackson',
29                 Rating            => 'R',
30                 NumExplodingSheep => 1,
31         });
32 }
33
34 package DeletingFilm;
35
36 use base 'Film';
37 sub DESTROY { shift->delete }
38
39 1;
40