From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Sat, 28 Jul 2012 17:37:25 +0000 (-0500)
Subject: Fix eq_bind checker
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=5fe06f15388d1da6efd42155d3aeb19d92139b7f;p=dbsrgits%2FSQL-Abstract.git

Fix eq_bind checker

We have to Deepcopy because otherwise we get $VAR->... incorrect failures
---

diff --git a/lib/SQL/Abstract/Test.pm b/lib/SQL/Abstract/Test.pm
index 2bc681e..119edd4 100644
--- a/lib/SQL/Abstract/Test.pm
+++ b/lib/SQL/Abstract/Test.pm
@@ -107,6 +107,7 @@ sub eq_bind {
 
   local $Data::Dumper::Useqq = 1;
   local $Data::Dumper::Sortkeys = 1;
+  local $Data::Dumper::Deepcopy = 1;
 
   return Dumper($bind_ref1) eq Dumper($bind_ref2);
 }