X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fwww_altid.t;h=de1e6ed66fa0d677ce1fb640c554f014f7cce1ac;hb=e95fbe90accedf079f3ddbd1df8e267e2fe90c2e;hp=94a2e807f8d7f3bd4bfd2ad0abf2e03ab34fbf5c;hpb=1e7cc8849b56ec96a16fda97921e1612cedc01a3;p=public-inbox.git diff --git a/t/www_altid.t b/t/www_altid.t index 94a2e807..de1e6ed6 100644 --- a/t/www_altid.t +++ b/t/www_altid.t @@ -1,5 +1,5 @@ #!perl -w -# Copyright (C) 2020-2021 all contributors +# Copyright (C) all contributors # License: AGPL-3.0+ use strict; use v5.10.1; use PublicInbox::TestCommon; use PublicInbox::Config; @@ -59,14 +59,7 @@ my $client = sub { }; test_psgi(sub { $www->call(@_) }, $client); SKIP: { - require_mods(qw(Plack::Test::ExternalServer), 4); - my $env = { PI_CONFIG => $cfgpath }; - my $sock = tcp_server() or die; - my ($out, $err) = map { "$tmpdir/std$_.log" } qw(out err); - my $cmd = [ qw(-httpd -W0), "--stdout=$out", "--stderr=$err" ]; - my $td = start_script($cmd, $env, { 3 => $sock }); - my ($h, $p) = tcp_host_port($sock); - local $ENV{PLACK_TEST_EXTERNALSERVER_URI} = "http://$h:$p"; - Plack::Test::ExternalServer::test_psgi(client => $client); + my $env = { PI_CONFIG => $cfgpath, TMPDIR => $tmpdir }; + test_httpd($env, $client); } done_testing;