X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frelationship%2Fcore.t;h=720ca2670485acb7aa267f0195dfa83040246016;hb=a359de728e5e749aaf3d550fceb023b808456340;hp=90e49a381d9a32d6dc85429e5f053628067398f8;hpb=63bb9738dd8fdca42ad88d99a2a3861ad2b00eed;p=dbsrgits%2FDBIx-Class.git diff --git a/t/relationship/core.t b/t/relationship/core.t index 90e49a3..720ca26 100644 --- a/t/relationship/core.t +++ b/t/relationship/core.t @@ -79,6 +79,10 @@ my $track = $schema->resultset("Track")->create( { } ); $track->set_from_related( cd => $cd ); +# has_relationship +ok(! $track->has_relationship( 'foo' ), 'Track has no relationship "foo"'); +ok($track->has_relationship( 'disc' ), 'Track has relationship "disk"' ); + is($track->disc->cdid, 4, 'set_from_related ok, including alternative accessor' ); $track->set_from_related( cd => undef ); @@ -268,7 +272,7 @@ is_same_sql_bind ( '( SELECT artist_undirected_maps.id1, artist_undirected_maps.id2 FROM artist me - LEFT JOIN artist_undirected_map artist_undirected_maps + JOIN artist_undirected_map artist_undirected_maps ON artist_undirected_maps.id1 = me.artistid OR artist_undirected_maps.id2 = me.artistid WHERE ( artistid = ? ) )',