diff options
author | Richard Levitte <levitte@openssl.org> | 2005-06-18 04:27:06 +0000 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2005-06-18 04:27:06 +0000 |
commit | 306aae6ceea52d23fb9104edc3a672344d356fe3 (patch) | |
tree | d2112ae2d0c473eaeb7d19eea29d1e0c777bb0be /util/pod2man.pl | |
parent | edb0600583efc33840baf52c374882b91c937b05 (diff) |
Have pod2man.pl accept '=for comment ...' before the '=head1 NAME' line.
PR: 1113
Diffstat (limited to 'util/pod2man.pl')
-rwxr-xr-x | util/pod2man.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/util/pod2man.pl b/util/pod2man.pl index 657e4e264e..546d1ec186 100755 --- a/util/pod2man.pl +++ b/util/pod2man.pl @@ -425,6 +425,7 @@ if ($name ne 'something') { } next if /^=cut\b/; # DB_File and Net::Ping have =cut before NAME next if /^=pod\b/; # It is OK to have =pod before NAME + next if /^=for\s+comment\b/; # It is OK to have =for comment before NAME die "$0: Invalid man page - 1st pod line is not NAME in $ARGV[0]\n" unless $lax; } die "$0: Invalid man page - no documentation in $ARGV[0]\n" unless $lax; |