From 333efa7c9da43d94272a872a59a6cd28da8ca245 Mon Sep 17 00:00:00 2001 From: Niko Tyni Date: Thu, 8 May 2008 14:32:33 +0300 Subject: Adjust Module::Build manual page extensions for the Debian Perl policy Bug-Debian: http://bugs.debian.org/479460 Patch-Name: debian/module_build_man_extensions.diff --- cpan/Module-Build/lib/Module/Build/Base.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/cpan/Module-Build/lib/Module/Build/Base.pm b/cpan/Module-Build/lib/Module/Build/Base.pm index 84e137f..4422cd4 100644 --- a/cpan/Module-Build/lib/Module/Build/Base.pm +++ b/cpan/Module-Build/lib/Module/Build/Base.pm @@ -3226,7 +3226,7 @@ sub manify_bin_pods { foreach my $file (keys %$files) { # Pod::Simple based parsers only support one document per instance. # This is expected to change in a future version (Pod::Simple > 3.03). - my $parser = Pod::Man->new( %podman_args ); + my $parser = Pod::Man->new( %podman_args, section => '1p' ); # binaries go in section 1p my $manpage = $self->man1page_name( $file ) . '.' . $self->config( 'man1ext' ); my $outfile = File::Spec->catfile($mandir, $manpage); @@ -3252,7 +3252,7 @@ sub manify_lib_pods { while (my ($file, $relfile) = each %$files) { # Pod::Simple based parsers only support one document per instance. # This is expected to change in a future version (Pod::Simple > 3.03). - my $parser = Pod::Man->new( %podman_args ); + my $parser = Pod::Man->new( %podman_args, section => '3pm' ); # libraries go in section 3pm my $manpage = $self->man3page_name( $relfile ) . '.' . $self->config( 'man3ext' ); my $outfile = File::Spec->catfile( $mandir, $manpage);