Ensure that the test server we start gets the correct lib path

[catagits/Catalyst-Engine-STOMP.git] / t / lib / TestServer.pm

diff --git a/t/lib/TestServer.pm b/t/lib/TestServer.pm
index 9061be2..943dbb2 100644 (file)
--- a/t/lib/TestServer.pm
+++ b/t/lib/TestServer.pm
@@ -43,7 +43,8 @@ sub start_server {
 
     $SIG{CHLD} = 'IGNORE';
     unless (fork()) {
-           system("$^X -I$FindBin::Bin/lib $FindBin::Bin/script/stomptestapp_stomp.pl --oneshot");
+        my $libs = join(' ', map { "-I$_" } @INC);
+           system("$^X $libs $FindBin::Bin/script/stomptestapp_stomp.pl --oneshot");
            exit 0;
     }
     print STDERR "server started, waiting for spinup...";