numify version
[scpubgit/Q-Branch.git] / t / 02where.t
index 3e9e649..f71a411 100644 (file)
@@ -6,7 +6,7 @@ use Test::More;
 use Test::Exception;
 
 use SQL::Abstract::Test qw/is_same_sql_bind/;
-plan tests => 15;
+plan tests => 16;
 
 use SQL::Abstract;
 
@@ -176,6 +176,13 @@ my @handle_tests = (
         bind => [44, 55, 22, 33],
     },
 
+   {
+       where => { -and => [{}, { 'me.id' => '1'}] },
+       stmt => " WHERE ( ( me.id = ? ) )",
+       bind => [ 1 ],
+   },
+
+
 );
 
 for my $case (@handle_tests) {