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

            
3
use strict;
4
use warnings;
5

            
6
use base 'MyModel5';
7

            
8
__PACKAGE__->attr(name => 'table1_3');
- added EXPERIMENTAL type() ...
Yuki Kimoto authored on 2011-03-21
9
__PACKAGE__->attr(table => 'table3');
add experimental DBIx::Custo...
Yuki Kimoto authored on 2011-02-24
10

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

            
- added EXPERIMENTAL type() ...
Yuki Kimoto authored on 2011-03-21
13
1;