X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F05in_between.t;h=1c2a8b4d3a1a08bf9a06fcb563589f849731a22c;hb=038b0a7ff074901d04975cb6b00a452aedf06464;hp=733615874b857a51b0eb8dcc2b91c009ba458b1e;hpb=90c87778411c072ba31879f7eb8991adc72ff6e4;p=dbsrgits%2FSQL-Abstract.git

diff --git a/t/05in_between.t b/t/05in_between.t
index 7336158..1c2a8b4 100644
--- a/t/05in_between.t
+++ b/t/05in_between.t
@@ -174,14 +174,14 @@ my @in_between_tests = (
   },
   {
     where => { x => { -in => [ 1, undef ] } },
-    stmt => " WHERE ( x IN ( ?, ? ) )",
-    bind => [ 1, undef ],
+    stmt => " WHERE ( x IN ( ? ) OR x IS NULL )",
+    bind => [ 1 ],
     test => '-in with undef as an element', 
   },
   {
     where => { x => { -in => [ 1, undef, 2, 3, undef ] } },
-    stmt => " WHERE ( x IN ( ?, ?, ?, ?, ? ) )",
-    bind => [ 1, undef, 2, 3, undef ],
+    stmt => " WHERE ( x IN ( ?, ?, ? ) OR x IS NULL )",
+    bind => [ 1, 2, 3 ],
     test => '-in with undef as an element',
   },
 );