X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fhttpd.t;fp=t%2Fhttpd.t;h=e0a2bf44164a0f79d6be8b6a34471337645352b0;hb=3eb26fe04dae68612c841e749abd2848ce78ae59;hp=e085c4b9f502b2bbdae5828ff379ddb332fcbfd9;hpb=0b84d8600368c67080e683e415f7e502a343316b;p=public-inbox.git diff --git a/t/httpd.t b/t/httpd.t index e085c4b9..e0a2bf44 100644 --- a/t/httpd.t +++ b/t/httpd.t @@ -24,15 +24,7 @@ my $addr = $group . '@example.com'; my $cfgpfx = "publicinbox.$group"; my $httpd = 'blib/script/public-inbox-httpd'; my $init = 'blib/script/public-inbox-init'; - -my %opts = ( - LocalAddr => '127.0.0.1', - ReuseAddr => 1, - Proto => 'tcp', - Type => SOCK_STREAM, - Listen => 1024, -); -my $sock = IO::Socket::INET->new(%opts); +my $sock = tcp_server(); my $pid; use_ok 'PublicInbox::Git'; use_ok 'PublicInbox::Import';