<record type=broken>Please post your descrip.mms with your reports</record>
BTW The Compaq TestDrive machines had their user disks wiped a few months
back, so I lost my Unixy VMS testing setup. I tried to restore it using GNV
(GNV's Not VMS) but their current stable packages are missing unzip and
gunzip and their stuff from CVS doesn't compile properly. Also, the OpenVMS
Galaxy machines have been down for weeks which means no MMS or MMK. :(
If you know the location of unzip and gunzip for VMS I should be able to
install MMK and start working on this on my own again.
On Thu, Jan 02, 2003 at 10:41:31PM -0600, Craig A. Berry wrote:
> >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.
You're still getting the eliminate_macros errors?
> 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.
What happened was MM_VMS->constants was printing out that macro but
MM_VMS->tools_other should have been doing it. Now that MM_VMS->constants
hands off to MM_Unix->constants, MM_VMS->tools_other will have to be fixed.
MM_VMS->tools_other needs an overhaul anyway so I'll fix that up. I'll
probably eliminate the USEMAKEFILE, USEMACROS and MACROEND special constants
setup by MM_VMS->tools_other as it seems more obfuscated to use the macro
than just the real value.
SAY will become ECHO and I'll propogate it to the other ports.
> The VMS-specific pm_to_blib override needs to be reinstated because
> the Unix one creates lines that are too long
That shouldn't be happening, split_command() should be doing the Right
Thing. How much longer than too long are they? A little over 256 or a lot?
> it concatenates macros
> as filespecs so you end up with invalid directories of the form
> [.[foo].bar]
The only concatenation done is when calculating the autodir and MM_VMS's old
pm_to_blib did nearly the same thing except it used $self->{INST_LIB}
instead of $(INST_LIB). Isn't eliminate_macros() supposed to take care of
things like that?
> and it is missing the pm_to_blib.ts target used to
> record a timestamp on VMS.
Hmmm... should be possible without overriding everything.
> Here's the patch. Not sure when I'll get back to the to-do list.
All right, I've patched the below in and I'll do the tools_other fix. If
you can give me a hand with the testdrive account I can probably fix the
rest on my own.
> --- 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]
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
I'm going to have to hurt you on principle.
