]>
Dogcows Code - chaz/p5-DBIx-Class-ResultSet-RecursiveUpdate/blob - t/lib/DBICTest/Schema/Lyrics.pm
1 package # hide from PAUSE
2 DBICTest
::Schema
::Lyrics
;
4 use base qw
/DBIx::Class::Core/;
6 __PACKAGE__-
>table('lyrics');
7 __PACKAGE__-
>add_columns(
9 data_type
=> 'integer',
10 is_auto_increment
=> 1,
13 data_type
=> 'integer',
17 __PACKAGE__-
>set_primary_key('lyric_id');
18 __PACKAGE__-
>belongs_to('track', 'DBICTest::Schema::Track', 'track_id');
19 __PACKAGE__-
>has_many('lyric_versions', 'DBICTest::Schema::LyricVersion', 'lyric_id');
21 __PACKAGE__-
>resultset_class( __PACKAGE__
. '::ResultSet');
23 package DBICTest
::Schema
::Lyrics
::ResultSet
;
25 use base
qw( DBIx::Class::ResultSet::RecursiveUpdate );
This page took 0.033687 seconds and 4 git commands to generate.