Initial version of Form::Processor::Model::RDBO

[blog.pm-common-perl-mods.git] / Form-Processor-Model-RDBO / t / lib / RDBO / Prior.pm

package RDBO::Prior;

use strict;

use base qw(RDBO::DB::Object);

__PACKAGE__->meta->setup(
    table   => 'priors',

    columns => [
        id   => { type => 'serial' },
        name => { type => 'varchar', length => 255 },
    ],

    primary_key_columns => [ 'id' ],
);

1;