New upstream version 5.00

1 files changed, 7 insertions, 4 deletions

diff --git a/t/docs/pod-spelling.t b/t/docs/pod-spelling.t
index 819aa69..491f932 100755
--- a/t/docs/pod-spelling.t
+++ b/t/docs/pod-spelling.t
@@ -6,7 +6,7 @@
 # which can be found at <https://www.eyrie.org/~eagle/software/rra-c-util/>.
 #
 # Written by Russ Allbery <eagle@eyrie.org>
-# Copyright 2019 Russ Allbery <eagle@eyrie.org>
+# Copyright 2019, 2021 Russ Allbery <eagle@eyrie.org>
 # Copyright 2013-2014
 #     The Board of Trustees of the Leland Stanford Junior University
 #
@@ -47,13 +47,16 @@ skip_unless_author('Spelling tests');
 # Load prerequisite modules.
 use_prereq('Test::Spelling');
 
-# Check all POD in the Perl distribution.  Add the examples directory if it
-# exists.  Also add any files in usr/bin or usr/sbin, which are widely used in
-# Stanford-internal packages.
+# Check all POD in the Perl distribution.  Add the examples and t/lib
+# directories if they exist.  Also add any files in usr/bin or usr/sbin, which
+# are widely used in Stanford-internal packages.
 my @files = all_pod_files();
 if (-d 'examples') {
     push(@files, all_pod_files('examples'));
 }
+if (-d File::Spec->catfile('t', 'lib')) {
+    push(@files, all_pod_files(File::Spec->catfile('t', 'lib')));
+}
 for my $dir (qw(usr/bin usr/sbin)) {
     if (-d $dir) {
         push(@files, glob("$dir/*"));