[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.396,1.397
Status: Beta
Brought to you by:
kwilliams
From: Ken W. <kwi...@us...> - 2005-03-10 05:03:25
|
Update of /cvsroot/module-build/Module-Build/lib/Module/Build In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4034/lib/Module/Build Modified Files: Base.pm Log Message: Integrate packlist stuff from branch Index: Base.pm =================================================================== RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v retrieving revision 1.396 retrieving revision 1.397 diff -u -d -r1.396 -r1.397 --- Base.pm 10 Mar 2005 04:53:13 -0000 1.396 +++ Base.pm 10 Mar 2005 05:03:14 -0000 1.397 @@ -2540,7 +2540,12 @@ unless $type =~ /^(lib|bin)doc$/; } } - + + # Write the packlist into the same place as ExtUtils::MakeMaker. + my $archdir = $self->install_destination('arch'); + my @ext = split /::/, $self->module_name; + $map{write} = File::Spec->catdir($archdir, 'auto', @ext, '.packlist'); + if (length(my $destdir = $self->{properties}{destdir} || '')) { foreach (keys %map) { # Need to remove volume from $map{$_} using splitpath, or else |