fixed bug signaled by Zbigniew Lukasiak : -and => [{}, {foo => 1}]

[scpubgit/Q-Branch.git] / lib / SQL / Abstract.pm

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 4b83400..c7199f1 100644 (file)
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -376,8 +376,10 @@ sub _where_ARRAYREF {
       UNDEF     => sub {puke "not supported : UNDEF in arrayref" },
     });
 
-    push @sql_clauses, $sql;
-    push @all_bind, @bind;
+    if ($sql) {
+      push @sql_clauses, $sql;
+      push @all_bind, @bind;
+    }
   }
 
   return $self->_join_sql_clauses($logic, \@sql_clauses, \@all_bind);