[patch@31780] fixes for cpanplus on VMS
John E. Malmberg [Sun, 2 Sep 2007 17:23:04 +0000 (12:23 -0500)]
From: "John E. Malmberg" <wb8tyw@qsl.net>
Message-id: <46DB37C8.3060100@qsl.net>

Only the hunk containing the replacement of catdir with
catfile in Module::Build::Base::install_map.

p4raw-id: //depot/perl@31814

lib/Module/Build/Base.pm

index 9ac7c96..b2cdb30 100644 (file)
@@ -3796,7 +3796,7 @@ sub install_map {
   if ($self->create_packlist and my $module_name = $self->module_name) {
     my $archdir = $self->install_destination('arch');
     my @ext = split /::/, $module_name;
-    $map{write} = File::Spec->catdir($archdir, 'auto', @ext, '.packlist');
+    $map{write} = File::Spec->catfile($archdir, 'auto', @ext, '.packlist');
   }
 
   # Handle destdir