convert undef value to expr call
Matt S Trout [Mon, 18 Mar 2019 04:15:26 +0000 (04:15 +0000)]
lib/SQL/Abstract.pm

index dc9a3b5..45114e6 100644 (file)
@@ -704,7 +704,7 @@ sub _expand_expr_hashpair {
       and not defined $v->{-value}
     )
   ) {
-    return $self->_expand_expr_hashpair($k => { $self->{cmp} => undef });
+    return $self->_expand_expr({ $k => { $self->{cmp} => undef } });
   }
   if (!ref($v) or Scalar::Util::blessed($v)) {
     my $d = our $Default_Scalar_To;