From: Matt S Trout <mst@shadowcat.co.uk>
Date: Fri, 15 Nov 2013 08:40:12 +0000 (+0000)
Subject: make keyword-like subs optional exports from ExprDeclare
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0875b420dee4aeb3f89b5b973595fddf92da0bdb;p=dbsrgits%2FData-Query.git

make keyword-like subs optional exports from ExprDeclare
---

diff --git a/lib/Data/Query/ExprDeclare.pm b/lib/Data/Query/ExprDeclare.pm
index ad8e360..f0285fb 100644
--- a/lib/Data/Query/ExprDeclare.pm
+++ b/lib/Data/Query/ExprDeclare.pm
@@ -8,12 +8,14 @@ use Safe::Isa;
 
 use base qw(Exporter);
 
-our @EXPORT = qw(
-  expr SELECT AS FROM BY JOIN ON LEFT WHERE ORDER GROUP DESC LIMIT OFFSET NULLS FIRST LAST
+our @EXPORT = qw(expr);
+
+our @EXPORT_OK = qw(
+  SELECT AS FROM BY JOIN ON LEFT WHERE ORDER GROUP DESC LIMIT OFFSET NULLS FIRST LAST
 );
 
 sub expr (&) {
-  _run_expr($_[0])->{expr};
+  _run_expr($_[0]);
 }
 
 sub _run_expr {