X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=xt%2Fsolver.t;fp=xt%2Fsolver.t;h=c76e0b0a5fc12e88b61fef813c2ac45851d72016;hp=32cd43cf2fec47bbc50b3ee1d33e92abc73f3c65;hb=e95fbe90accedf079f3ddbd1df8e267e2fe90c2e;hpb=1e7cc8849b56ec96a16fda97921e1612cedc01a3 diff --git a/xt/solver.t b/xt/solver.t index 32cd43cf..c76e0b0a 100644 --- a/xt/solver.t +++ b/xt/solver.t @@ -57,20 +57,10 @@ while (($ibx_name, $urls) = each %$todo) { } } -SKIP: { - require_mods(qw(Plack::Test::ExternalServer), $nr); - delete @$todo{@gone}; - - my $sock = tcp_server() or BAIL_OUT $!; - my ($tmpdir, $for_destroy) = tmpdir(); - my ($out, $err) = map { "$tmpdir/std$_.log" } qw(out err); - my $cmd = [ qw(-httpd -W0), "--stdout=$out", "--stderr=$err" ]; - my $td = start_script($cmd, undef, { 3 => $sock }); - my ($h, $p) = tcp_host_port($sock); - local $ENV{PLACK_TEST_EXTERNALSERVER_URI} = "http://$h:$p"; - while (($ibx_name, $urls) = each %$todo) { - Plack::Test::ExternalServer::test_psgi(client => $client); - } +delete @$todo{@gone}; +my $env = { PI_CONFIG => PublicInbox::Config->default_file }; +while (($ibx_name, $urls) = each %$todo) { + test_httpd($env, $client, $nr); } done_testing();