-package # hide from PAUSE
+package # hide from PAUSE
DBICTest::Schema::Employee;
+use warnings;
+use strict;
+
use base qw/DBICTest::BaseResult/;
__PACKAGE__->load_components(qw( Ordered ));
size => 100,
is_nullable => 1,
},
+ encoded => {
+ data_type => 'integer',
+ is_nullable => 1,
+ },
);
__PACKAGE__->set_primary_key('employee_id');
# Do not add unique constraints here - different groups are used throughout
# the ordered tests
+__PACKAGE__->belongs_to (secretkey => 'DBICTest::Schema::Encoded', 'encoded', {
+ join_type => 'left'
+});
+
1;