At 08:26 AM 4/11/00 +0200, Martin Vorlaenderwrote:
> > > As I already wanted to have a look at Perl 5.6, I installed the
> > > CPAN version yesterday.
> > > XML::Parser::Expat's DESCRIP.MMS still looks the same, i.e. the bug
> > > is still there. <sigh>
> >
> > That is too bad. Do you think a modification to MM_VMS.pm is in order,
> > or could it be worked around with changes to the Makefile.PL?
>
>I'll have yet to look deeper into things, e.g. why the author thinks he
>needs that C and OBJECT attributes, and why MM_VMS munges things up.
>If I only had the time I'd like to have...
Martin,
A very belated reply. The MakeMaker problem causing trouble here was fixed
prior to 5.6.0, patch at
<http://www.xray.mpe.mpg.de/mailing-lists/vmsperl/1999-07/msg00058.html>
However, the Extutils::MM_VMS::fixpath() method no longer exists in 5.6.0
and has apparently been replaced by the File::Spec:VMS::fixpath() method.
This consolidation is clearly the right thing to do in general, but the
latter method was never updated to accommodate a list of
space-separated filenames. It needs to be whacked until it does so, and the
patch below is probably what's needed, but I'm out the door and will be away
for a few days so probably won't be able to test it for awhile. Let us know
if you have a chance to try it out.
--- lib/File/Spec/VMS.pm;-0 Tue Mar 21 02:55:48 2000
+++ lib/File/Spec/VMS.pm Tue May 2 17:38:07 2000
@@ -88,10 +88,10 @@
if ($path =~ m#^\$\([^\)]+\)\z#s || $path =~ m#[/:>\]]#) {
if ($force_path or $path =~ /(?:DIR\)|\])\z/) {
- $fixedpath = vmspath($self->eliminate_macros($path));
+ $fixedpath = join(' ', map(vmspath($_),split(/\s+/,
+$self->eliminate_macros($path))));
}
else {
- $fixedpath = vmsify($self->eliminate_macros($path));
+ $fixedpath = join(' ', map(vmsify($_),split(/\s+/,
+$self->eliminate_macros($path))));
}
}
elsif ((($prefix,$name) = ($path =~ m#^\$\(([^\)]+)\)(.+)#s)) &&
$self->{$prefix}) {
[End of patch.]
_______________________________________________
Craig A. Berry
mailto:[EMAIL PROTECTED]
