X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fhttpd-unix.t;h=b321c789f4f471d3525d76de8cf55e62e8fed9bf;hb=0acad050fe38033baedfed83f5976aeabebf3287;hp=2c8f8d6b2a6b0457a02cd0e83e7188b7faa5c6a5;hpb=b93c7a7efed33c68a2cf229d3086d4edec082149;p=public-inbox.git diff --git a/t/httpd-unix.t b/t/httpd-unix.t index 2c8f8d6b..b321c789 100644 --- a/t/httpd-unix.t +++ b/t/httpd-unix.t @@ -1,17 +1,12 @@ -# Copyright (C) 2016-2019 all contributors +# Copyright (C) 2016-2020 all contributors # License: AGPL-3.0+ # Tests for binding Unix domain sockets use strict; use warnings; use Test::More; -require './t/common.perl'; +use PublicInbox::TestCommon; use Errno qw(EADDRINUSE); - -foreach my $mod (qw(Plack::Util Plack::Builder HTTP::Date HTTP::Status)) { - eval "require $mod"; - plan skip_all => "$mod missing for httpd-unix.t" if $@; -} - +require_mods(qw(Plack::Util Plack::Builder HTTP::Date HTTP::Status)); use IO::Socket::UNIX; my ($tmpdir, $for_destroy) = tmpdir(); my $unix = "$tmpdir/unix.sock"; @@ -85,8 +80,7 @@ check_sock($unix); } SKIP: { - eval 'require Net::Server::Daemonize'; - skip('Net::Server missing for pid-file/daemonization test', 20) if $@; + require_mods('Net::Server::Daemonize', 20); my $pid_file = "$tmpdir/pid"; for my $w (qw(-W0 -W1)) { # wait for daemonization