Newer Older
12 lines | 0.183kb
add experimental DBIx::Custo...
Yuki Kimoto authored on 2011-02-24
1
package MyModel5::table1_1;
2

            
3
use strict;
4
use warnings;
5

            
6
use base 'MyModel5';
7

            
8
__PACKAGE__->attr(table => 'table1');
9

            
10
__PACKAGE__->attr('primary_key' => sub { ['key1', 'key2'] });
11

            
12
1;