fix psgi_file test without Catalyst installed
Graham Knop [Mon, 27 Jul 2020 19:47:57 +0000 (21:47 +0200)]
t/aggregate/psgi_file.t

index f96bf92..1f8f0c5 100644 (file)
@@ -22,8 +22,9 @@ TestApp->psgi_app;
 };
 close($psgi);
 
+my @command = ($^X, '-I', "$FindBin::Bin/../lib", '-I', "$FindBin::Bin/../../lib", '-c', $path);
 open my $stdin, '<', File::Spec->devnull;
-my $pid = open3 $stdin, my $stdout, undef, $^X, '-I', "$FindBin::Bin/../lib", '-c', $path;
+my $pid = open3 $stdin, my $stdout, undef, @command;
 my $output = do { local $/; <$stdout> };
 waitpid $pid, 0;