On VMS, if the $Config{make} is either MMK or MMS, then the makefile is
'DESCRIP.MMS'.
Currently on VMS it is believed that $Config{make} is always one of
those two, however I hope to change that in the future.
With this change and the others, 20_CPANPLUS-Dist-MM.t passes all tests.
-John
--- /rsync_root/perl/lib/CPANPLUS/Internals/Constants.pm Mon May 28
08:18:03 2007
+++ lib/CPANPLUS/Internals/Constants.pm Mon Sep 3 13:13:57 2007
@@ -115,10 +115,17 @@
'Makefile.PL' )
: 'Makefile.PL';
};
-use constant MAKEFILE => sub { return @_
+use constant MAKEFILE => sub { my $makefile_name = 'Makefile';
+
+ # if VMS && MMK/MMS then DESCRIP.MMS
+ if (($^O eq 'VMS') &&
+ ($Config::Config{make} =~ /MM[S|K]/i))
{
+ $makefile_name = 'DESCRIP.MMS';
+ }
+ return @_
? File::Spec->catfile( @_,
- 'Makefile' )
- : 'Makefile';
+ $makefile_name )
+ : $makefile_name;
};
use constant BUILD_PL => sub { return @_
? File::Spec->catfile( @_,
