From: Vincent Pit <vince@profvince.com>
Date: Sun, 29 Nov 2009 14:14:06 +0000 (+0100)
Subject: Test comparing an atom to an atom string
X-Git-Tag: v0.09~2
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git;a=commitdiff_plain;h=bdd88f65716362b68b249371a9987541b89ff28d

Test comparing an atom to an atom string
---

diff --git a/t/31-atom-cmp.t b/t/31-atom-cmp.t
index 5770471..82623d7 100644
--- a/t/31-atom-cmp.t
+++ b/t/31-atom-cmp.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 4 * ((8 * 7) / 2);
+use Test::More tests => 6 * ((8 * 7) / 2);
 
 use CPANPLUS::Dist::Gentoo::Atom;
 
@@ -120,6 +120,7 @@ for my $t (@tests) {
   }
 
   compare_ok($a, '<=>', $b, $exp);
+  compare_ok($a, '<=>', "$b", $exp);
   compare_ok($a, 'cmp', $b, $exp);
  }
 }