From: Matt S Trout <mst@shadowcat.co.uk>
Date: Mon, 25 Mar 2019 01:31:42 +0000 (+0000)
Subject: eliminate $logic from _expand_expr
X-Git-Tag: v2.000000~3^2~361
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d9e1854da09bd8a19cf2332b53f1c61a8e001047;p=dbsrgits%2FSQL-Abstract.git

eliminate $logic from _expand_expr
---

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 4685ed8..3c5c4e4 100644
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -553,7 +553,7 @@ sub render_expr {
 }
 
 sub _expand_expr {
-  my ($self, $expr, $logic) = @_;
+  my ($self, $expr) = @_;
   our $Expand_Depth ||= 0; local $Expand_Depth = $Expand_Depth + 1;
   return undef unless defined($expr);
   if (ref($expr) eq 'HASH') {
@@ -569,7 +569,7 @@ sub _expand_expr {
     if (my $exp = $self->{expand}{$key}) {
       return $self->$exp($key, $value);
     }
-    return $self->_expand_expr_hashpair($key, $value, $logic);
+    return $self->_expand_expr_hashpair($key, $value);
   }
   if (ref($expr) eq 'ARRAY') {
     my $logic = lc($self->{logic});