X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema%2FHelperRels.pm;h=45e0ed8818623f30d7faabdc2c32eabc9c802461;hb=637ca936ff3aeee87af89aaaf75e2035c29576f8;hp=ff476408d82b3b32ef340e73d6207f0cd3d34a30;hpb=0f6ac8bbd6575d44fcb30cefcb5e387bb09d8b79;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/lib/DBICTest/Schema/HelperRels.pm b/t/lib/DBICTest/Schema/HelperRels.pm index ff47640..45e0ed8 100644 --- a/t/lib/DBICTest/Schema/HelperRels.pm +++ b/t/lib/DBICTest/Schema/HelperRels.pm @@ -1,4 +1,5 @@ -package DBICTest::Schema::HelperRels; +package # hide from PAUSE + DBICTest::Schema::HelperRels; use base 'DBIx::Class::Core'; @@ -10,7 +11,8 @@ DBICTest::Schema::Artist->has_many(onekeys => 'DBICTest::Schema::OneKey'); DBICTest::Schema::CD->belongs_to('artist', 'DBICTest::Schema::Artist'); DBICTest::Schema::CD->has_many(tracks => 'DBICTest::Schema::Track'); -DBICTest::Schema::CD->has_many(tags => 'DBICTest::Schema::Tag'); +DBICTest::Schema::CD->has_many(tags => 'DBICTest::Schema::Tag', undef, + { order_by => 'tag' }); DBICTest::Schema::CD->has_many(cd_to_producer => 'DBICTest::Schema::CD_to_Producer' => 'cd'); DBICTest::Schema::CD->might_have(liner_notes => 'DBICTest::Schema::LinerNotes', @@ -42,7 +44,8 @@ DBICTest::Schema::CD_to_Producer->belongs_to( ); DBICTest::Schema::Artist->has_many( 'artist_undirected_maps', 'DBICTest::Schema::ArtistUndirectedMap', - [{'foreign.id1' => 'self.artistid'}, {'foreign.id2' => 'self.artistid'}] + [{'foreign.id1' => 'self.artistid'}, {'foreign.id2' => 'self.artistid'}], + { cascade_copy => 0 } # this would *so* not make sense ); DBICTest::Schema::ArtistUndirectedMap->belongs_to( 'artist1', 'DBICTest::Schema::Artist', 'id1');