From: Matt S Trout <mst@shadowcat.co.uk>
Date: Mon, 25 Mar 2019 01:30:03 +0000 (+0000)
Subject: _expand_expr hashref is always and
X-Git-Tag: v1.90_01~342
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=892f9038203bdbf2b259b4d26c3789a2293e5496;p=dbsrgits%2FSQL-Abstract.git

_expand_expr hashref is always and
---

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 6a037fb..4667758 100644
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -559,8 +559,7 @@ sub _expand_expr {
   if (ref($expr) eq 'HASH') {
     return undef unless my $kc = keys %$expr;
     if ($kc > 1) {
-      $logic ||= 'and';
-      return $self->_expand_andor("-${logic}", $expr);
+      return $self->_expand_andor(-and => $expr);
     }
     my ($key, $value) = %$expr;
     if ($key =~ /^-/ and $key =~ s/ [_\s]? \d+ $//x ) {