From: Vincent Pit <vince@profvince.com>
Date: Sun, 29 Nov 2009 16:02:16 +0000 (+0100)
Subject: cmp_ok between overloaded objects considered harmful with older Test::More
X-Git-Tag: v0.10~10
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=8702e4c0231384658add45cb4660c31c4d9bf1a8;p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git

cmp_ok between overloaded objects considered harmful with older Test::More
---

diff --git a/t/32-atom-and.t b/t/32-atom-and.t
index 36819ab..22ceb81 100644
--- a/t/32-atom-and.t
+++ b/t/32-atom-and.t
@@ -119,7 +119,7 @@ for my $t (@tests) {
   } elsif ($err) {
    fail "$desc failed but shouldn't: $err";
   } else {
-   cmp_ok $a, '==', $exp, "$desc == '$exp'";
+   ok +($a == $exp), "$desc == '$exp'";
   }
  }
 }