package # hide from PAUSE
DBICTest::Schema::Link;
use base 'DBIx::Class::Core';
use strict;
use warnings;
__PACKAGE__->table('link');
__PACKAGE__->add_columns(
'id' => {
data_type => 'integer',
is_auto_increment => 1
},
'url' => {
data_type => 'varchar',
size => 100,
is_nullable => 1,
},
'title' => {
data_type => 'varchar',
size => 100,
is_nullable => 1,
},
);
__PACKAGE__->set_primary_key('id');
use overload '""' => sub { shift->url }, fallback=> 1;
__PACKAGE__->resultset_class( __PACKAGE__ . '::ResultSet');
package DBICTest::Schema::Link::ResultSet;
use base qw( DBIx::Class::ResultSet::RecursiveUpdate );
1;