}
if ( scalar @undocced > 0 ) {
foreach ( @undocced ) {
+ next if /-/; # Skip the -- end-of-flags marker
err("$doc: undocumented option -$_");
}
}
# If not given args, check that all man1 commands are named properly.
if ( scalar @ARGV == 0 ) {
foreach (glob('doc/man1/*.pod')) {
- next if /CA.pl/ || /openssl.pod/;
+ next if /CA.pl/ || /openssl\.pod/ || /tsget\.pod/;
err("$_ doesn't start with openssl-") unless /openssl-/;
}
}