Re: Win32 Status

Message-ID: <20020412141533.GB9788@blackrider>

p4raw-id: //depot/perl@15886

diff --git a/lib/ExtUtils/t/INST.t b/lib/ExtUtils/t/INST.t
index 60480cb..c6ed62f 100644 (file)
--- a/lib/ExtUtils/t/INST.t
+++ b/lib/ExtUtils/t/INST.t
@@ -58,8 +58,9 @@ isa_ok( $mm, 'ExtUtils::MakeMaker' );
 is( $mm->{NAME}, 'Big::Fat::Dummy',  'NAME' );
 is( $mm->{VERSION}, 0.01,            'VERSION' );
 
-my $config_prefix = $^O eq 'VMS' ? VMS::Filespec::unixify($Config{prefix})
-                                 : $Config{prefix};
+my $config_prefix = $^O eq 'VMS' 
+                        ? VMS::Filespec::unixify($Config{installprefixexp})
+                        : $Config{installprefixexp};
 is( $mm->{PREFIX}, $config_prefix,   'PREFIX' );
 
 is( !!$mm->{PERL_CORE}, !!$ENV{PERL_CORE}, 'PERL_CORE' );