1package A::Schema::Result::Album;
2
3use DBIx::Class::Candy -base => 'A::Schema::Result';
4
5table 'albums';
6
7primary_column id => {
8   data_type => 'int',
9   is_auto_increment => 1,
10   is_numeric => 1,
11};
12
13has_column name => (
14   data_type => 'varchar',
15   size => 25,
16   is_nullable => 1,
17);
18
19column artist_id => {
20   data_type => 'int',
21   is_nullable => 0,
22};
23
24has_many songs => 'A::Schema::Result::Song', 'album_id';
25
26sub test_strict {
27   require Test::More;
28   eval '$foo = 1';
29   Test::More::ok($@, 'strict mode is on');
30}
31
321;
33
34