aboutsummaryrefslogtreecommitdiffstats
path: root/util/pod2man.pl
diff options
context:
space:
mode:
Diffstat (limited to 'util/pod2man.pl')
-rwxr-xr-xutil/pod2man.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/util/pod2man.pl b/util/pod2man.pl
index 546d1ec18600..025d914f2e8b 100755
--- a/util/pod2man.pl
+++ b/util/pod2man.pl
@@ -425,7 +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
+ next if /^=(for|begin|end)\s+comment\b/; # It is OK to have =for =begin or =end 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;