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 (file)
--- 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 (file)
--- 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 {