From: Richard Levitte Date: Sun, 5 May 2019 09:30:38 +0000 (+0200) Subject: util/find-doc-nits: Fine tune detection of POD markup in NAME section X-Git-Tag: openssl-3.0.0-alpha1~2067 X-Git-Url: https://git.openssl.org/?p=openssl.git;a=commitdiff_plain;h=1f79ddf5049ff53ad8a7cbab76e62d02d9ac099f util/find-doc-nits: Fine tune detection of POD markup in NAME section POD markup is only forbidden in the actual names, while permitted in the description. Reviewed-by: Paul Dale (Merged from https://github.com/openssl/openssl/pull/8878) --- diff --git a/util/find-doc-nits b/util/find-doc-nits index 66966eb355..25f3d5e2c8 100755 --- a/util/find-doc-nits +++ b/util/find-doc-nits @@ -66,6 +66,7 @@ sub name_synopsis() $tmp =~ tr/\n/ /; print "$id trailing comma before - in NAME\n" if $tmp =~ /, *-/; $tmp =~ s/ -.*//g; + print "$id POD markup among the names in NAME\n" if $tmp =~ /[<>]/; $tmp =~ s/ */ /g; print "$id missing comma in NAME\n" if $tmp =~ /[^,] /; @@ -198,8 +199,6 @@ sub check() if $contents =~ /=head\d\s\s+/; print "$id period in NAME section\n" if $contents =~ /=head1 NAME.*\.\n.*=head1 SYNOPSIS/ms; - print "$id POD markup in NAME section\n" - if $contents =~ /=head1 NAME.*[<>].*=head1 SYNOPSIS/ms; print "$id Duplicate $1 in L<>\n" if $contents =~ /L<([^>]*)\|([^>]*)>/ && $1 eq $2; print "$id Bad =over $1\n"