Most of the code reviewed... Missing ResultSet->populate, ResultSet->find, Row->copy...
[dbsrgits/DBIx-Class-Historic.git] / t / lib / DBICTest / Schema / Bookmark.pm
1 package # hide from PAUSE
2     DBICTest::Schema::Bookmark;
3
4 use base qw/DBICTest::BaseResult/;
5
6 use strict;
7 use warnings;
8
9 __PACKAGE__->table('bookmark');
10 __PACKAGE__->add_columns(
11     'id' => {
12         data_type => 'integer',
13         is_auto_increment => 1
14     },
15     'link' => {
16         data_type => 'integer',
17         is_nullable => 1,
18     },
19 );
20
21 __PACKAGE__->set_primary_key('id');
22
23 require DBICTest::Schema::Link; # so we can get a columnlist
24 __PACKAGE__->belongs_to(
25     link => 'DBICTest::Schema::Link', 'link', {
26     on_delete => 'SET NULL',
27     join_type => 'LEFT',
28     proxy => { map { join('_', 'link', $_) => $_ } DBICTest::Schema::Link->columns },
29 });
30
31 1;