Newer Older
13 lines | 0.182kb
added Next version
Yuki Kimoto authored on 2011-11-16
1
package MyModel1::table1;
2

            
removed DBIx::Custom::Next f...
Yuki Kimoto authored on 2011-11-16
3
use DBIx::Custom::Model -base;
added Next version
Yuki Kimoto authored on 2011-11-16
4

            
5
sub insert {
6
    my ($self, $param) = @_;
7
    
8
    return $self->SUPER::insert($param);
9
}
10

            
11
sub list { shift->select; }
12

            
13
1;