X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FDBICTest%2FSchema%2FResultSet%2FArtist.pm;fp=t%2Flib%2FDBICTest%2FSchema%2FResultSet%2FArtist.pm;h=4cc4a09a30d64a9166534c33f917a8c9c224d1d0;hb=9432d8bfcbdce5343443278c6722241196fca9d5;hp=20ac92d9b1685ce9cebaedccce590e4f19a85f50;hpb=4cac0ed673bc17698d8e736fa4d4fbb70666c7fe;p=dbsrgits%2FDBIx-Class-ResultSet-WithMetaData.git diff --git a/t/lib/DBICTest/Schema/ResultSet/Artist.pm b/t/lib/DBICTest/Schema/ResultSet/Artist.pm index 20ac92d..4cc4a09 100644 --- a/t/lib/DBICTest/Schema/ResultSet/Artist.pm +++ b/t/lib/DBICTest/Schema/ResultSet/Artist.pm @@ -28,7 +28,7 @@ method with_substr_key () { } method with_substr_key_obj () { - $self->_with_meta_key( + $self->_with_object_meta_key( substr => sub { my ($hash, $obj) = @_; return substr($obj->name, 0, 3);