about summary refs log tree commit homepage
path: root/xt/git-http-backend.t
diff options
authorEric Wong <e@80x24.org>2019-12-22 22:17:37 +0000
committerEric Wong <e@80x24.org>2019-12-24 03:47:01 +0000
commita09f678d8254064af7ca6dcfb3c3f84b5ae37b51 (patch)
treec32233ae88dbaa3b914812a80f539054d7f086da /xt/git-http-backend.t
parentf1259e56d75b8f06a40fb466bee51a399cc317c5 (diff)
This cuts down on lines of code in individual test cases and
fixes some misnamed error messages by using "$0" consistently.

This will also provide us with a method of swapping out
dependencies which provide equivalent functionality (e.g
"Xapian" SWIG can replace "Search::Xapian" XS bindings).
Diffstat (limited to 'xt/git-http-backend.t')
1 files changed, 2 insertions, 6 deletions
diff --git a/xt/git-http-backend.t b/xt/git-http-backend.t
index 5f96369f..421c6316 100644
--- a/xt/git-http-backend.t
+++ b/xt/git-http-backend.t
@@ -11,12 +11,8 @@ use PublicInbox::TestCommon;
 my $git_dir = $ENV{GIANT_GIT_DIR};
 plan 'skip_all' => 'GIANT_GIT_DIR not defined' unless $git_dir;
-foreach my $mod (qw(BSD::Resource
-                        Plack::Util Plack::Builder
-                        HTTP::Date HTTP::Status Net::HTTP)) {
-        eval "require $mod";
-        plan skip_all => "$mod missing for git-http-backend.t" if $@;
+require_mods(qw(BSD::Resource Plack::Util Plack::Builder
+                HTTP::Date HTTP::Status Net::HTTP));
 my $psgi = "./t/git-http-backend.psgi";
 my ($tmpdir, $for_destroy) = tmpdir();
 my $err = "$tmpdir/stderr.log";