X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema%2FArtist.pm;h=b0892876a90b1cb726fac1a8d1f5a90358bac310;hb=e29e2b27d08d645f8a50d7ffafef28c67688207e;hp=2745c0389baecba263d8e7a8e5b555711d0510f7;hpb=52c53388b5381f9a064a9e31491ff8ce2a123990;p=dbsrgits%2FDBIx-Class.git diff --git a/t/lib/DBICTest/Schema/Artist.pm b/t/lib/DBICTest/Schema/Artist.pm index 2745c03..b089287 100644 --- a/t/lib/DBICTest/Schema/Artist.pm +++ b/t/lib/DBICTest/Schema/Artist.pm @@ -30,6 +30,10 @@ __PACKAGE__->add_columns( }, ); __PACKAGE__->set_primary_key('artistid'); +__PACKAGE__->add_unique_constraint(['name']); +__PACKAGE__->add_unique_constraint(artist => ['artistid']); # do not remove, part of a test +__PACKAGE__->add_unique_constraint(u_nullable => [qw/charfield rank/]); + __PACKAGE__->mk_classdata('field_name_for', { artistid => 'primary key', @@ -38,11 +42,14 @@ __PACKAGE__->mk_classdata('field_name_for', { __PACKAGE__->has_many( cds => 'DBICTest::Schema::CD', undef, - { order_by => 'year' }, + { order_by => { -asc => 'year'} }, ); __PACKAGE__->has_many( cds_unordered => 'DBICTest::Schema::CD' ); +__PACKAGE__->has_many( + cds_very_very_very_long_relationship_name => 'DBICTest::Schema::CD' +); __PACKAGE__->has_many( twokeys => 'DBICTest::Schema::TwoKeys' ); __PACKAGE__->has_many( onekeys => 'DBICTest::Schema::OneKey' ); @@ -70,7 +77,7 @@ sub sqlt_deploy_hook { sub store_column { my ($self, $name, $value) = @_; - $value = 'X '.$value if ($name eq 'name' && $value && $value =~ /store_column test/); + $value = 'X '.$value if ($name eq 'name' && $value && $value =~ /(X )?store_column test/); $self->next::method($name, $value); }