From: Matt S Trout <mst@shadowcat.co.uk>
Date: Fri, 15 Nov 2013 10:05:06 +0000 (+0000)
Subject: disable precedence warnings for &
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e3714aadd0ec2c8a71214149dea0a36b6ae022a8;p=dbsrgits%2FData-Query.git

disable precedence warnings for &
---

diff --git a/lib/Data/Query/ExprDeclare.pm b/lib/Data/Query/ExprDeclare.pm
index f0285fb..d3689a1 100644
--- a/lib/Data/Query/ExprDeclare.pm
+++ b/lib/Data/Query/ExprDeclare.pm
@@ -5,8 +5,12 @@ use Data::Query::ExprBuilder::Identifier;
 use Data::Query::ExprHelpers;
 use Data::Query::Constants;
 use Safe::Isa;
+use Exporter ();
 
-use base qw(Exporter);
+sub import {
+  warnings->unimport('precedence');
+  goto &Exporter::import;
+}
 
 our @EXPORT = qw(expr);