0a38057 13 years ago
1 contributor
16 lines | 0.217kb
package MyTable1::book;

use strict;
use warnings;

use base 'DBIx::Custom::Table';

sub insert {
    my ($self, $param) = @_;
    
    return $self->SUPER::insert(param => $param);
}

sub list { shift->select; }

1;