Newer Older
10 lines | 0.142kb
add experimental DBIx::Custo...
Yuki Kimoto authored on 2011-02-21
1
package MyModel5::table1;
2

            
3
use strict;
4
use warnings;
5

            
6
use base 'MyModel5';
7

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

            
10
1;