From: Matt S Trout <mst@shadowcat.co.uk>
Date: Tue, 11 Sep 2018 22:10:45 +0000 (+0000)
Subject: disable IN and BETWEEN implementations
X-Git-Tag: v1.90_01~466
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f663e672a396751e63da18886cd38838cd610bb5;p=dbsrgits%2FSQL-Abstract.git

disable IN and BETWEEN implementations
---

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 66e0af0..f187516 100644
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -37,8 +37,8 @@ our $AUTOLOAD;
 # special operators (-in, -between). May be extended/overridden by user.
 # See section WHERE: BUILTIN SPECIAL OPERATORS below for implementation
 my @BUILTIN_SPECIAL_OPS = (
-  {regex => qr/^ (?: not \s )? between $/ix, handler => '_where_field_BETWEEN'},
-  {regex => qr/^ (?: not \s )? in      $/ix, handler => '_where_field_IN'},
+  {regex => qr/^ (?: not \s )? between $/ix, handler => sub { die "NOPE" }},
+  {regex => qr/^ (?: not \s )? in      $/ix, handler => sub { die "NOPE" }},
   {regex => qr/^ ident                 $/ix, handler => '_where_op_IDENT'},
   {regex => qr/^ value                 $/ix, handler => '_where_op_VALUE'},
   {regex => qr/^ is (?: \s+ not )?     $/ix, handler => '_where_field_IS'},