]> git.vpit.fr Git - perl/modules/Acme-CPANAuthors-You-re_using.git/blobdiff - t/10-base.t
Update VPIT::TestHelpers to 15e8aee3
[perl/modules/Acme-CPANAuthors-You-re_using.git] / t / 10-base.t
index cab221723d939bef3ff4af46f2277e6aad59b7ec..72e2bd88caaa110805050ce7a000c20fb3bd10d0 100644 (file)
@@ -9,13 +9,16 @@ use Acme::CPANAuthors;
 
 local @INC = grep $_ ne '.', @INC;
 
+diag 'Directories in @INC :';
+diag "  $_" for @INC;
+
 my $authors = eval {
  local $SIG{__WARN__} = sub {
   my ($msg) = @_;
   if ($msg =~ /^You're_using CPAN Authors are not registered yet: (.*)/s) {
    die $1;
   }
-  CORE::warn(@_);
+  diag $_ for @_;
  };
  Acme::CPANAuthors->new("You're_using");
 };
@@ -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';