| To: | bug-test-harness [...] rt.cpan.org |
| From: | David Wheeler <david [...] kineticode.com> |
| Subject: | Add Include Directories to @INC |
| Date: | Thu, 29 Dec 2005 14:55:06 -0800 |
No, sorry, that was a stupid question. The environment variables are
*not* killed by prove. However @INC doesn't get properly set. If I
pass "-It/lib", it works, but if a test script in turn calls another
script that needs t/lib in its @INC, it's not there. Test::Harness
seems to do the right thing by what's in @INC when you call runtest
(), so why not something like this?
--- prove 2005-11-08 10:02:05.000000000 -0800
+++ prove 2005-11-14 16:26:14.000000000 -0800
@@ -88,6 +88,8 @@
print join( "\n", @tests, "" );
} else {
print "# ", scalar @tests, " tests to run\n" if
$Test::Harness::debug;
+ local @INC = @INC;
+ push @INC, @includes;
runtests(@tests);
}
}