Michael G Schwern wrote:
I believe the only serious problem now on VMS is the META.yml generation
during 'make dist'. The current command is simply too long for VMS and
has to be split up. Everything else passes, at least on the machine
I'm using.
Thanks. What version of Perl? Using [EMAIL PROTECTED] I still get major
blow-ups in basic.t, which may be Perl's fault and not MakeMaker's, but
it's still something that's got to be tracked down.
The caseless Install problem I haven't yet addressed.
That'll be a nasty one. Probably Manifest.pm needs work as well but I
haven't looked recently.
I've attached a patch that fixes a couple of things that, once again, I
noticed by reading the generated descrip.mms:
1.) When forcing the extension to build itself with its own libraries,
the paths have to be relative, not absolute. Among other things, that
keeps the Perl command used for one-liners from getting too long.
2.) There was a spurious blank line in between the man1 and man3
pod-generating lines in the manifypods target.
3.) The list of prerequisites for the ppd target must each be generated
by its own one-liner. Otherwise, if there are more than one or two
prerequisites, the line gets too long.
--- Makefile.PL;-0 Sat Dec 21 21:13:15 2002
+++ Makefile.PL Fri Mar 28 14:39:13 2003
@@ -74,8 +74,8 @@
my($lib, $tlib);
BEGIN {
- $lib = File::Spec->rel2abs('lib/');
- $tlib = File::Spec->rel2abs('t/lib/');
+ $lib = File::Spec->canonpath('lib/');
+ $tlib = File::Spec->canonpath('t/lib/');
}
# Make sure PERLRUN uses the MakeMaker about to be installed
--- lib/ExtUtils/MM_Any.pm;-0 Sun Mar 23 18:59:16 2003
+++ lib/ExtUtils/MM_Any.pm Fri Mar 28 14:17:02 2003
@@ -298,6 +298,8 @@
$(NOECHO) $(POD2MAN_EXE) --section=3 --perm_rw=$(PERM_RW)
CMD
+ chomp @man1_cmds;
+ chomp @man3_cmds;
$manify .= join '', map { "$_\n" } @man1_cmds, @man3_cmds;
return $manify;
--- lib/ExtUtils/MM_Unix.pm;-0 Thu Mar 27 04:07:14 2003
+++ lib/ExtUtils/MM_Unix.pm Fri Mar 28 13:44:35 2003
@@ -3297,6 +3295,8 @@
push @ppd_oneliners, $self->oneliner(qq{print qq{$ppd_xml}});
$ppd_xml = '\t<IMPLEMENTATION>\n';
+ push @ppd_oneliners, $self->oneliner(qq{print qq{$ppd_xml}});
+ $ppd_xml = '';
foreach my $prereq (sort keys %{$self->{PREREQ_PM}}) {
my $pre_req = $prereq;
$pre_req =~ s/::/-/g;
@@ -3307,9 +3307,9 @@
PPD_OUT
chomp $ppd_xml;
+ push @ppd_oneliners, $self->oneliner(qq{print qq{$ppd_xml}});
}
- push @ppd_oneliners, $self->oneliner(qq{print qq{$ppd_xml}});
$ppd_xml = sprintf <<'PPD_OUT', $Config{archname};
\t\t<OS NAME="$(OSNAME)" />\n\t\t<ARCHITECTURE NAME="%s" />\n
