[perl #116971] avoid feeding manisort a bad @INC

the C<< use TestInit qw(T) >> in manifest.t both changes to the
build tree *and* initializes $ENV{PERL5LIB} to "lib", so there's
no need fo runperl() to supply (an incorrect) -I.. when running
manisort.

diff --git a/t/porting/manifest.t b/t/porting/manifest.t
index b8c63c5..c367fc7 100644 (file)
--- a/t/porting/manifest.t
+++ b/t/porting/manifest.t
@@ -71,7 +71,8 @@ SKIP: {
 
     my $result = runperl('progfile' => 'Porting/manisort',
                          'args'     => [ '-c', $manifest ],
-                         'stderr'   => 1);
+                         'stderr'   => 1,
+                         'nolib'    => 1 );
 
     like($result, qr/is sorted properly/, 'MANIFEST sorted properly');
 }