t/pod/diag.t skips ../ext, so it should skip ../cpan too.

diff --git a/t/pod/diag.t b/t/pod/diag.t
index cfe572f..eb6f10e 100644 (file)
--- a/t/pod/diag.t
+++ b/t/pod/diag.t
@@ -31,7 +31,7 @@ while (<$diagfh>) {
 my @todo = ('..');
 while (@todo) {
   my $todo = shift @todo;
-  next if $todo ~~ ['../t', '../lib', '../ext'];
+  next if $todo ~~ ['../t', '../lib', '../ext', '../cpan'];
   # opmini.c is just a copy of op.c, so there's no need to check again.
   next if $todo eq '../opmini.c';
   if (-d $todo) {