The attached patch against the latest MakeMaker snapshot gets all tests
passing even on older VMS systems with rather severe limitations to
directory depth. Only minor modifications to t/basic.t were necessary. I
used Perl 5.8.4.

As far as I know, this was the last impediment to getting 6.22 out the
door, into bleadperl, and from thence into 5.8.5.

--- t/basic.t;-0        Tue Nov  4 00:19:55 2003
+++ t/basic.t   Fri May 28 23:08:34 2004
@@ -48,8 +48,10 @@
 ok( chdir('Big-Dummy'), "chdir'd to Big-Dummy" ) ||
   diag("chdir failed: $!");
 
-my @mpl_out = run(qq{$perl Makefile.PL "PREFIX=../dummy-install"});
-END { rmtree '../dummy-install'; }
+my $dummy_install = $Is_VMS ? 'BFD_TEST_ROOT:[dummy-install]' : '../dummy-install';
+
+my @mpl_out = run(qq{$perl Makefile.PL "PREFIX=$dummy_install"});
+END { rmtree $dummy_install; }
 
 cmp_ok( $?, '==', 0, 'Makefile.PL exited with zero' ) ||
   diag(@mpl_out);
@@ -130,12 +132,12 @@
 like( $install_out, qr/^Installing /m );
 like( $install_out, qr/^Writing /m );
 
-ok( -r '../dummy-install',     '  install dir created' );
+ok( -r $dummy_install,     '  install dir created' );
 my %files = ();
 find( sub { 
     # do it case-insensitive for non-case preserving OSs
     $files{lc $_} = $File::Find::name; 
-}, '../dummy-install' );
+}, $dummy_install );
 ok( $files{'dummy.pm'},     '  Dummy.pm installed' );
 ok( $files{'liar.pm'},      '  Liar.pm installed'  );
 ok( $files{'.packlist'},    '  packlist created'   );
@@ -143,7 +145,7 @@
 
 
 SKIP: {
-    skip "VMS install targets do not preserve $(PREFIX)", 8 if $Is_VMS;
+    skip "VMS install targets do not preserve \$(PREFIX)", 8 if $Is_VMS;
 
     $install_out = run("$make install PREFIX=elsewhere");
     is( $?, 0, 'install with PREFIX override' ) || diag $install_out;
@@ -162,7 +164,7 @@
 
 
 SKIP: {
-    skip "VMS install targets do not preserve $(DESTDIR)", 10 if $Is_VMS;
+    skip "VMS install targets do not preserve \$(DESTDIR)", 10 if $Is_VMS;
 
     $install_out = run("$make install PREFIX= DESTDIR=other");
     is( $?, 0, 'install with DESTDIR' ) || 
@@ -202,7 +204,7 @@
 
 
 SKIP: {
-    skip "VMS install targets do not preserve $(PREFIX)", 9 if $Is_VMS;
+    skip "VMS install targets do not preserve \$(PREFIX)", 9 if $Is_VMS;
 
     $install_out = run("$make install PREFIX=elsewhere DESTDIR=other/");
     is( $?, 0, 'install with PREFIX override and DESTDIR' ) || 
@@ -260,7 +262,7 @@
 
 
 # Make sure init_dirscan doesn't go into the distdir
[EMAIL PROTECTED] = run(qq{$perl Makefile.PL "PREFIX=../dummy-install"});
[EMAIL PROTECTED] = run(qq{$perl Makefile.PL "PREFIX=$dummy_install"});
 
 cmp_ok( $?, '==', 0, 'Makefile.PL exited with zero' ) || diag(@mpl_out);
 

Reply via email to