From: Dave Rolsky <autarch@urth.org>
Date: Fri, 8 Aug 2008 21:29:35 +0000 (+0000)
Subject: One last tweak to make sure our Sub::Name-using tests _do_ run when we
X-Git-Tag: 0_64_01~79
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2621d59fd7886110273773603bef310765e18b93;p=gitmo%2FClass-MOP.git

One last tweak to make sure our Sub::Name-using tests _do_ run when we
have Sub::Name installed.
---

diff --git a/t/003_methods.t b/t/003_methods.t
index d2f613e..ebc5494 100644
--- a/t/003_methods.t
+++ b/t/003_methods.t
@@ -9,7 +9,7 @@ use Test::Exception;
 use Scalar::Util qw/reftype/;
 
 BEGIN {
-    if ( eval 'use Sub::Name ();' ) {
+    if ( eval 'use Sub::Name (); 1;' ) {
         plan tests => 65;
     }
     else {
diff --git a/t/082_get_code_info.t b/t/082_get_code_info.t
index 6eb66ad..e3c74e0 100644
--- a/t/082_get_code_info.t
+++ b/t/082_get_code_info.t
@@ -6,7 +6,7 @@ use warnings;
 use Test::More;
 
 BEGIN {
-    if ( eval 'use Sub::Name qw(subname);' ) {
+    if ( eval 'use Sub::Name qw(subname); 1;' ) {
         plan tests => 5;
     }
     else {