[Catalyst-commits] r13756 - Catalyst-Runtime/5.80/trunk/t/author

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2010-12-04 21:19:41 +0000 (Sat, 04 Dec 2010)
New Revision: 13756

Modified:
   Catalyst-Runtime/5.80/trunk/t/author/http-server.t
Log:
Use the proper way of setting @INC for tests

Modified: Catalyst-Runtime/5.80/trunk/t/author/http-server.t
===================================================================
--- Catalyst-Runtime/5.80/trunk/t/author/http-server.t	2010-12-04 21:19:37 UTC (rev 13755)
+++ Catalyst-Runtime/5.80/trunk/t/author/http-server.t	2010-12-04 21:19:41 UTC (rev 13756)
@@ -88,13 +88,12 @@
 sub prove {
     my ($inc, $tests) = @_;
     if (!(my $pid = fork)) {
-        unshift @INC, @{ $inc };
-
         require TAP::Harness;
 
         my $aggr = -e '.aggregating';
         my $harness = TAP::Harness->new({
-            ($aggr ? (test_args => $tests) : ())
+            ($aggr ? (test_args => $tests) : ()),
+            lib => $inc,
         });
 
         my $aggregator = $aggr