[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.340.2.23,1.340.2.24

[Ken W. <kwi...@us...>]

Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8763/lib/Module/Build

Modified Files:
      Tag: release-0_26_branch
	Base.pm 
Log Message:
Write a .packlist file

Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.340.2.23
retrieving revision 1.340.2.24
diff -u -d -r1.340.2.23 -r1.340.2.24
--- Base.pm	23 Feb 2005 04:05:03 -0000	1.340.2.23
+++ Base.pm	28 Feb 2005 22:41:52 -0000	1.340.2.24
@@ -2386,6 +2386,11 @@
     }
   }
 
+  # Write the packlist into the same place as ExtUtils::MakeMaker.
+  my $archdir = $self->install_destination('arch');
+  my $ext = File::Spec->catdir(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