Have pod2man.pl accept '=for comment ...' before the '=head1 NAME' line.
PR: 1113
This commit is contained in:
		@@ -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;
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user