From: Peter Rabbitson Date: Wed, 22 Sep 2010 14:19:34 +0000 (+0000) Subject: Backout errnoeusly committed stuff X-Git-Tag: v1.70~49 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e1de4ee2b0e76daef28caede7bfbd8f7a7e43f07;p=dbsrgits%2FSQL-Abstract.git Backout errnoeusly committed stuff --- diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm index fcded1d..c39fde1 100644 --- a/lib/SQL/Abstract.pm +++ b/lib/SQL/Abstract.pm @@ -34,9 +34,8 @@ my @BUILTIN_UNARY_OPS = ( # the digits are backcompat stuff { regex => qr/^and (?: \s? \d+ )? $/xi, handler => '_where_op_ANDOR' }, { regex => qr/^or (?: \s? \d+ )? $/xi, handler => '_where_op_ANDOR' }, - { regex => qr/^ (?: not \s )? bool $/xi, handler => '_where_op_BOOL' }, - { regex => qr/^ ident $/xi, handler => '_where_op_IDENT' }, { regex => qr/^nest (?: \s? \d+ )? $/xi, handler => '_where_op_NEST' }, + { regex => qr/^ (?: not \s )? bool $/xi, handler => '_where_op_BOOL' }, ); #====================================================================== @@ -532,16 +531,6 @@ sub _where_func_generic { return ($sql, @bind); } -sub _where_op_IDENT { - my ($self, $op, $v) = @_; - - if (ref $v) { - puke "-$op takes a single scalar argument (a quotable identifier)"; - } - - return $self->_convert($self->_quote($v)); -} - sub _where_op_ANDOR { my ($self, $op, $v) = @_;