From: Vincent Pit <vince@profvince.com>
Date: Fri, 13 Mar 2015 14:50:04 +0000 (-0300)
Subject: In t/10-base.t, always show @INC
X-Git-Tag: rt91248~2
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=afd5c9c527d944235f539e91e8db3a5891177bdf;p=perl%2Fmodules%2FAcme-CPANAuthors-You-re_using.git

In t/10-base.t, always show @INC
---

diff --git a/t/10-base.t b/t/10-base.t
index cab2217..c3899ce 100644
--- a/t/10-base.t
+++ b/t/10-base.t
@@ -9,6 +9,9 @@ use Acme::CPANAuthors;
 
 local @INC = grep $_ ne '.', @INC;
 
+diag 'Directories in @INC :';
+diag "  $_" for @INC;
+
 my $authors = eval {
  local $SIG{__WARN__} = sub {
   my ($msg) = @_;
@@ -26,9 +29,6 @@ if ($authors) {
  plan skip_all => $@;
 }
 
-diag 'Directories in @INC :';
-diag "  $_" for @INC;
-
 my $count = $authors->count;
 diag "$count authors found";
 cmp_ok $count, '>', 0, 'there are some authors';