Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12726/lib/Module/Build
Modified Files:
Tag: release-0_26_branch
Base.pm
Log Message:
Simplify a File::Spec-ism
Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.340.2.24
retrieving revision 1.340.2.25
diff -u -d -r1.340.2.24 -r1.340.2.25
--- Base.pm 28 Feb 2005 22:41:52 -0000 1.340.2.24
+++ Base.pm 28 Feb 2005 22:54:07 -0000 1.340.2.25
@@ -2388,8 +2388,8 @@
# 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');
+ 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) {
|
