X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema%2FArtist.pm;h=34532dc8efd459ceb7516a5a8c885f80b393b057;hb=6e22e629bb00f5c721a6fbec0017596c1e28dde3;hp=e1556aeb84d5e2aea1ef60066c0bc0be3fbe78c5;hpb=6fbef4a4db1f453046b0450c485c495d743030d5;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/lib/DBICTest/Schema/Artist.pm b/t/lib/DBICTest/Schema/Artist.pm index e1556ae..34532dc 100644 --- a/t/lib/DBICTest/Schema/Artist.pm +++ b/t/lib/DBICTest/Schema/Artist.pm @@ -1,6 +1,9 @@ -package # hide from PAUSE +package # hide from PAUSE DBICTest::Schema::Artist; +use warnings; +use strict; + use base qw/DBICTest::BaseResult/; use Carp qw/confess/; @@ -41,6 +44,8 @@ __PACKAGE__->mk_classdata('field_name_for', { name => 'artist name', }); +# the undef condition in this rel is *deliberate* +# tests oddball legacy syntax __PACKAGE__->has_many( cds => 'DBICTest::Schema::CD', undef, { order_by => { -asc => 'year'} },