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-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3a10d914c4c9b48cafa4f2ccdeb69430e77413e8;p=scpubgit%2FQ-Branch.git

eliminate $logic from _expand_expr
---

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index c2570bf..dd5035e 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});