From: Peter Rabbitson <ribasushi@cpan.org>
Date: Wed, 22 Sep 2010 10:00:37 +0000 (+0000)
Subject: Stupid stupid typo
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a1e204f4ac8bc478a6821aca8df5cfa4af18a628;p=scpubgit%2FQ-Branch.git

Stupid stupid typo
---

diff --git a/lib/SQL/Abstract/Tree.pm b/lib/SQL/Abstract/Tree.pm
index 0c45aa0..90d3052 100644
--- a/lib/SQL/Abstract/Tree.pm
+++ b/lib/SQL/Abstract/Tree.pm
@@ -282,7 +282,7 @@ sub _recurse_parse {
       }
     }
     # binary operator keywords
-    elsif ( $token =~ /^ $$binary_op_re $ /x ) {
+    elsif ( $token =~ /^ $binary_op_re $ /x ) {
       my $op = uc $token;
       my $right = $self->_recurse_parse($tokens, PARSE_RHS);