From: Marcus Ramberg <mramberg@cpan.org>
Date: Thu, 19 Mar 2009 20:49:39 +0000 (+0000)
Subject: SQLA syntax regression from 1.24
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=97b9b66e0a59d13fc2a286a4a595e7f97d1cf465;p=scpubgit%2FQ-Branch.git

SQLA syntax regression from 1.24
---

diff --git a/t/01generate.t b/t/01generate.t
index 675c273..ee8fd83 100755
--- a/t/01generate.t
+++ b/t/01generate.t
@@ -526,6 +526,16 @@ my @tests = (
               stmt_q => 'SELECT * FROM `test` WHERE ( `a` < to_date(?, \'MM/DD/YY\') AND `b` = ? )',
               bind   => [[{dummy => 1} => '02/02/02'], [b => 8]],
       },             
+      #57
+      {
+              func   => 'select',
+              new    => {bindtype => 'columns'},
+              args   => ['test', '*', { -or => [ -and => [ a => 'a', b => 'b' ],-and => [ c => 'c', d => 'd' ]  ]  }],
+              stmt   => 'SELECT * FROM test WHERE ( ( ( ( ( a = ? ) AND ( b = ? ) ) ) OR ( ( ( c = ? ) AND ( d = ? ) ) ) ) )',
+              stmt_q => 'SELECT * FROM `test` WHERE ( ( ( ( ( `a` = ? ) AND ( `b` = ? ) ) ) OR ( ( ( `c` = ? ) AND ( `d` = ? ) ) ) ) )',
+              bind   => [[a => 'a'], [b => 'b'], [ c => 'c'],[ d => 'd']],
+      },          
+      
 );