Newer Older
17 lines | 0.221kb
add feture. all model class ...
Yuki Kimoto authored on 2011-02-18
1
package MyModel1::Company;
removed experimental base_ta...
Yuki Kimoto authored on 2011-02-15
2

            
3
use strict;
4
use warnings;
5

            
add feture. all model class ...
Yuki Kimoto authored on 2011-02-18
6
use base 'DBIx::Custom::Model';
removed experimental base_ta...
Yuki Kimoto authored on 2011-02-15
7

            
8

            
9
sub insert {
10
    my ($self, $param) = @_;
11
    
12
    return $self->SUPER::insert(param => $param);
13
}
14

            
15
sub list { shift->select; }
16

            
17
1;