diff options
author | Karl Williamson <khw@cpan.org> | 2022-05-04 10:33:51 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2022-05-04 11:33:00 -0600 |
commit | af1168d9f98538d8f05c6cf3eaf0c4fd11753f88 (patch) | |
tree | b55c91827dc6789cc76f00e8c3e06926292178a3 /t/porting | |
parent | 948368bb6f05b7f5dd91b0ebe9085391374be959 (diff) | |
download | perl-af1168d9f98538d8f05c6cf3eaf0c4fd11753f88.tar.gz |
podcheck.t: Treat some additional files specially
metaconfig units and plain text files aren't pod. And lines
like Perl/perl.git aren't going to be file names.
Diffstat (limited to 't/porting')
-rw-r--r-- | t/porting/known_pod_issues.dat | 2 | ||||
-rw-r--r-- | t/porting/podcheck.t | 6 |
2 files changed, 6 insertions, 2 deletions
diff --git a/t/porting/known_pod_issues.dat b/t/porting/known_pod_issues.dat index 5b0fc91b4f..dc39ee80df 100644 --- a/t/porting/known_pod_issues.dat +++ b/t/porting/known_pod_issues.dat @@ -389,7 +389,7 @@ pod/perlbook.pod Verbatim line length including indents exceeds 78 by 1 pod/perldebguts.pod Verbatim line length including indents exceeds 78 by -1 pod/perldebtut.pod Verbatim line length including indents exceeds 78 by 2 pod/perldtrace.pod Verbatim line length including indents exceeds 78 by -1 -pod/perlgit.pod ? Should you be using F<...> or maybe L<...> instead of 3 +pod/perlgit.pod ? Should you be using F<...> or maybe L<...> instead of 1 pod/perlgit.pod Verbatim line length including indents exceeds 78 by 1 pod/perlguts.pod ? Should you be using L<...> instead of 1 pod/perlhack.pod ? Should you be using L<...> instead of 1 diff --git a/t/porting/podcheck.t b/t/porting/podcheck.t index 07f704465f..be92095175 100644 --- a/t/porting/podcheck.t +++ b/t/porting/podcheck.t @@ -431,6 +431,7 @@ my $non_pods = qr/ | opt # VMS linker options files | mms # MM(K|S) description files | ts # timestamp files generated during build + | txt # plain text | $obj_ext # object files | exe # $Config{'exe_ext'} might be empty string | $lib_ext # object libraries @@ -438,6 +439,7 @@ my $non_pods = qr/ | $dl_ext # dynamic libraries | gif # GIF images (example files from CGI.pm) | eg # examples from libnet + | U # metaconfig unit | core .* ) $ @@ -448,6 +450,7 @@ my $non_pods = qr/ | ^(?i:Makefile\.PL)$ | ^core (?: $ | \. .* ) | ^vgcore\.[1-9][0-9]*$ + | \b Changes \b /x; # Matches something that looks like a file name, but is enclosed in C<...> @@ -459,10 +462,11 @@ my $C_path_re = qr{ ^ | \d+/\d+ \b # probable fractions | (?: [LF] < )+ | OS/2 \b + | Perl/perl.git \b + | Perl/perl5.git \b | Perl/Tk \b | origin/blead \b | origin/maint \b - ) /? # Optional initial slash \w+ # First component of path, doesn't begin with |