use strict;
-use base qw(SL::DB::Object);
+use parent qw(SL::DB::Object);
__PACKAGE__->meta->table('contacts');
cp_gender => { type => 'character', length => 1 },
cp_givenname => { type => 'text' },
cp_id => { type => 'integer', not_null => 1, sequence => 'id' },
+ cp_main => { type => 'boolean', default => 'false' },
cp_mobile1 => { type => 'text' },
cp_mobile2 => { type => 'text' },
cp_name => { type => 'text' },