X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F05in_between.t;h=a3e7656ddc3b2f0d25be62c63e4250c40d65033f;hb=1279622f9ff55dd447a3e5a2e99f35cacfe667bb;hp=bb98f1175d1e14a4d5d4fb8a9363414feabf1162;hpb=39bf6ceae5f7f2dcf8706d0cbad024e8532b8072;p=scpubgit%2FQ-Branch.git

diff --git a/t/05in_between.t b/t/05in_between.t
index bb98f11..a3e7656 100644
--- a/t/05in_between.t
+++ b/t/05in_between.t
@@ -317,7 +317,13 @@ my @in_between_tests = (
     },
     stmt => ' WHERE (x, y) IN ((?, ?), (?, ?))',
     bind => [ 1..4 ],
-    test => 'Complex IN',
+    test => 'Complex top-level -in',
+  },
+  {
+    where => { -is => [ 'bob', undef ] },
+    stmt => ' WHERE bob IS NULL',
+    bind => [],
+    test => 'Top level -is ok',
   },
 );