Newer Older
8 lines | 0.133kb
added common test executing ...
Yuki Kimoto authored on 2011-08-07
1
package MyModel4::company;
2

            
3
use base 'MyModel4';
4

            
5
sub insert { shift->SUPER::insert(param => $_[0]) }
6
sub list { shift->select }
7

            
8
1;