X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F08special_ops.t;h=c4b303e7b5ab616f8b26c35118b2a93d5041c3ac;hb=cf5b7ab163f8ac123ebc9bb1156e79646cd5bd2f;hp=6b97f96ab6a3f682f415f56dc803b4018eb2eddf;hpb=8ae5fb690080d48b026175badc416230378c72f7;p=scpubgit%2FQ-Branch.git diff --git a/t/08special_ops.t b/t/08special_ops.t index 6b97f96..c4b303e 100644 --- a/t/08special_ops.t +++ b/t/08special_ops.t @@ -86,12 +86,13 @@ my @tests = ( }, # Verify inconsistent behaviour from DBIx::Class:SQLMaker::Oracle works + # (unary use of special op is not equivalent to special op + =) { where => { - manager_id => { '-prior' => { -ident => 'employee_id' } }, - customer_id => { '>', { '-prior' => \'account_mgr_id' } }, + foo_id => { '=' => { '-prior' => { -ident => 'bar_id' } } }, + baz_id => { '-prior' => { -ident => 'quux_id' } }, }, - stmt => ' WHERE ( customer_id > ( PRIOR account_mgr_id ) AND manager_id = PRIOR employee_id )', + stmt => ' WHERE ( baz_id = PRIOR quux_id AND foo_id = ( PRIOR bar_id ) )', bind => [], }, );