X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01generate.t;fp=t%2F01generate.t;h=969dd07d2d65dfecafbbb3945303106d26923cd2;hb=ff8ca6b4ad42a4b4d7adbfc89c820b48e2dd52c0;hp=4962c23b9b66e5fd53042bf7493cd644d6891770;hpb=032dfe204e1d3d8dc43116c8b25ebbca257e9ac0;p=dbsrgits%2FSQL-Abstract.git

diff --git a/t/01generate.t b/t/01generate.t
index 4962c23..969dd07 100644
--- a/t/01generate.t
+++ b/t/01generate.t
@@ -580,6 +580,11 @@ my @tests = (
               stmt_q => 'SELECT * FROM `test` WHERE ( `a` IS NULL AND `b` IS NOT NULL )',
               bind => [],
       },
+      {
+              func => 'select',
+              args => ['test', '*', { a => { -in => undef } }],
+              exception_like => qr/Argument passed to the 'IN' operator can not be undefined/,
+      },
 );
 
 for my $t (@tests) {