support model full-qualified...
|
1 |
package MyModel5::main::table2; |
2 | ||
3 |
use strict; |
|
4 |
use warnings; |
|
5 | ||
6 |
use base 'MyModel5'; |
|
7 | ||
8 |
__PACKAGE__->attr(table => 'main.table2'); |
|
9 | ||
10 |
__PACKAGE__->attr('primary_key' => sub { ['key1', 'key2'] }); |
|
11 | ||
12 |
1; |