X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F76joins.t;h=ba87a0a04ea1b7251ecb9e93a497ce006dd5443f;hb=a7f4b74cf7a4e82dcf4ef3847c5881f6dad361c9;hp=c6e795c42c4ef2af916fa73eabd9b5b1a96de564;hpb=1cc3ce1eef3deb794a2b2dd4cff166b91145e7c4;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/76joins.t b/t/76joins.t index c6e795c..ba87a0a 100644 --- a/t/76joins.t +++ b/t/76joins.t @@ -4,7 +4,6 @@ use warnings; use Test::More; use lib qw(t/lib); use DBICTest; -use Data::Dumper; use DBIC::SqlMakerTest; my $schema = DBICTest->init_schema(); @@ -32,9 +31,9 @@ my $match = 'person child JOIN person father ON ( father.person_id = ' . 'child.father_id ) JOIN person mother ON ( mother.person_id ' . '= child.mother_id )' ; -is_same_sql_bind( - $sa->_recurse_from(@j), [], - $match, [], +is_same_sql( + $sa->_recurse_from(@j), + $match, 'join 1 ok' ); @@ -52,9 +51,9 @@ $match = 'person mother JOIN (person child JOIN person father ON (' . ' father.person_id = child.father_id )) ON ( mother.person_id = ' . 'child.mother_id )' ; -is_same_sql_bind( - $sa->_recurse_from(@j2), [], - $match, [], +is_same_sql( + $sa->_recurse_from(@j2), + $match, 'join 2 ok' ); @@ -69,9 +68,9 @@ $match = 'person child INNER JOIN person father ON ( father.person_id = ' . '= child.mother_id )' ; -is_same_sql_bind( - $sa->_recurse_from(@j3), [], - $match, [], +is_same_sql( + $sa->_recurse_from(@j3), + $match, 'join 3 (inner join) ok' ); @@ -89,9 +88,9 @@ $match = 'person mother LEFT JOIN (person child RIGHT JOIN person father ON (' . ' father.person_id = child.father_id )) ON ( mother.person_id = ' . 'child.mother_id )' ; -is_same_sql_bind( - $sa->_recurse_from(@j4), [], - $match, [], +is_same_sql( + $sa->_recurse_from(@j4), + $match, 'join 4 (nested joins + join types) ok' ); @@ -104,9 +103,9 @@ $match = 'person child JOIN person father ON ( father.person_id != ' . 'child.father_id ) JOIN person mother ON ( mother.person_id ' . '= child.mother_id )' ; -is_same_sql_bind( - $sa->_recurse_from(@j5), [], - $match, [], +is_same_sql( + $sa->_recurse_from(@j5), + $match, 'join 5 (SCALAR reference for ON statement) ok' );