X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema%2FEmployee.pm;h=dde6fd3be5b5659c036e1801fa1bc5d1627d87ef;hb=6e22e629bb00f5c721a6fbec0017596c1e28dde3;hp=78b3d167ea32e0eca8d6de79f85f72d509ad3370;hpb=ff657a4317312f9fc858e128affaf97aa46c336b;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/lib/DBICTest/Schema/Employee.pm b/t/lib/DBICTest/Schema/Employee.pm index 78b3d16..dde6fd3 100644 --- a/t/lib/DBICTest/Schema/Employee.pm +++ b/t/lib/DBICTest/Schema/Employee.pm @@ -1,7 +1,10 @@ -package # hide from PAUSE +package # hide from PAUSE DBICTest::Schema::Employee; -use base 'DBIx::Class::Core'; +use warnings; +use strict; + +use base qw/DBICTest::BaseResult/; __PACKAGE__->load_components(qw( Ordered )); @@ -19,23 +22,33 @@ __PACKAGE__->add_columns( data_type => 'integer', is_nullable => 1, }, + group_id_2 => { + data_type => 'integer', + is_nullable => 1, + }, + group_id_3 => { + data_type => 'integer', + is_nullable => 1, + }, name => { data_type => 'varchar', size => 100, is_nullable => 1, }, + encoded => { + data_type => 'integer', + is_nullable => 1, + }, ); __PACKAGE__->set_primary_key('employee_id'); __PACKAGE__->position_column('position'); -#__PACKAGE__->add_unique_constraint(position_group => [ qw/position group_id/ ]); +# Do not add unique constraints here - different groups are used throughout +# the ordered tests -__PACKAGE__->mk_classdata('field_name_for', { - employee_id => 'primary key', - position => 'list position', - group_id => 'collection column', - name => 'employee name', +__PACKAGE__->belongs_to (secretkey => 'DBICTest::Schema::Encoded', 'encoded', { + join_type => 'left' }); 1;