At 7:51 PM -0800 1/2/03, Michael G Schwern wrote:
>This looks like you're using an old snapshot, maybe 6.06_02?
Well, it was from 23 December, so I guess it was one iteration out of date.
>makemaker.org is down for some reason, so attached is a snapshot.
Yes, I've noticed makemaker.org is unavailable. I've now tried the
new snapshot and the results aren't all that much different than with
the previous one. The patch at the end of this message, though, gets
us to where we can at least run the Makefile.PL. I don't think we're
that close to being able to use the resulting Makefile yet. Here's
what the patch fixes:
Handling of DISTVNAME moved so that it actually exists before being
written out.
Extraneous newlines no longer added to macros in init_main. This is
what was causing eliminate_macros to invoke itself; it matched the
newline at the end of $self->{FULLEXT} as whitespace and assumed it
had a space-separated list of filespecs. Also, FULLEXT doesn't need
to be run through fixpath twice.
To-do:
The NOECHO macro definition has gone missing.
The VMS-specific pm_to_blib override needs to be reinstated because
the Unix one creates lines that are too long, it concatenates macros
as filespecs so you end up with invalid directories of the form
[.[foo].bar], and it is missing the pm_to_blib.ts target used to
record a timestamp on VMS.
Here's the patch. Not sure when I'll get back to the to-do list.
--- lib/ExtUtils/MM_VMS.pm_orig Thu Jan 2 22:12:49 2003
+++ lib/ExtUtils/MM_VMS.pm Thu Jan 2 22:12:49 2003
@@ -318,16 +318,12 @@
=item init_main (override)
-Override DISTVNAME so it uses VERSION_SYM to avoid getting too many
-dots in the name.
-
=cut
sub init_main {
my($self) = shift;
$self->SUPER::init_main;
- $self->{DISTVNAME} = "$self->{DISTNAME}-$self->{VERSION_SYM}";
$self->{DEFINE} ||= '';
if ($self->{DEFINE} ne '') {
@@ -500,10 +496,10 @@
# Fixup files for MMS macros
# XXX is this list complete?
for my $macro (qw/
- FULLEXT VERSION_FROM OBJECT LDFROM
+ VERSION_FROM OBJECT LDFROM
/ ) {
next unless defined $self->{$macro};
- $self->{$macro} = $self->fixpath($self->{$macro},0)."\n";
+ $self->{$macro} = $self->fixpath($self->{$macro},0);
}
@@ -872,6 +868,9 @@
DIST_DEFAULT default target to use to tardist
create a distribution
+ DISTVNAME name of the resulting archive $(DISTNAME)-$(VERSION_SYM)
+ (minus suffixes)
+
=cut
sub init_dist {
@@ -883,6 +882,11 @@
$self->{DIST_DEFAULT} ||= 'zipdist';
$self->SUPER::init_dist;
+
+ # Override DISTVNAME so it uses VERSION_SYM to avoid getting too many
+ # dots in the name. Must be after super call so $self->{DISTNAME} is defined.
+
+ $self->{DISTVNAME} = $self->{DISTNAME}.'-'.$self->{VERSION_SYM};
}
=item c_o (override)
[end of patch]
--
________________________________________
Craig A. Berry
mailto:[EMAIL PROTECTED]
"... getting out of a sonnet is much more
difficult than getting in."
Brad Leithauser
