Have pod2man.pl accept '=for comment ...' before the '=head1 NAME' line.
authorRichard Levitte <levitte@openssl.org>
Sat, 18 Jun 2005 04:27:06 +0000 (04:27 +0000)
committerRichard Levitte <levitte@openssl.org>
Sat, 18 Jun 2005 04:27:06 +0000 (04:27 +0000)
PR: 1113

util/pod2man.pl

index 657e4e264e07dab613f489fe0601d86daec725ff..546d1ec18600fcee81331cacbb82c77e84d1962d 100755 (executable)
@@ -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;