about summary refs log tree commit homepage
path: root/t/hl_mod.t
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2021-09-13 20:53:50 +0000
committerEric Wong <e@80x24.org>2021-09-13 21:11:13 +0000
commit04657044bb3695d70298624eb25394fb864fb718 (patch)
treefce610c4e7c2b3a7287d9a3cbde42bfc2ff36bfa /t/hl_mod.t
parentdc489bfd4b4c659b7ebb166ab540b4e767e51aaa (diff)
downloadpublic-inbox-04657044bb3695d70298624eb25394fb864fb718.tar.gz
t/v2mirror.t and t/lei-mirror.t are now skipped when curl
is missing (instead of failing in appropriate places).
A bunch of which() checks are updated to use require_cmd
to avoid explicitly loading Spawn.
Diffstat (limited to 't/hl_mod.t')
-rw-r--r--t/hl_mod.t9
1 files changed, 2 insertions, 7 deletions
diff --git a/t/hl_mod.t b/t/hl_mod.t
index ffe9e784..96878d51 100644
--- a/t/hl_mod.t
+++ b/t/hl_mod.t
@@ -1,12 +1,7 @@
 #!/usr/bin/perl -w
 # Copyright (C) 2019-2021 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
-use strict;
-use warnings;
-use Test::More;
-use PublicInbox::Spawn qw(which);
-use PublicInbox::TestCommon;
-use IO::Handle; # ->autoflush
+use strict; use v5.10.1; use PublicInbox::TestCommon; use IO::Handle; # ->autoflush
 use Fcntl qw(:seek);
 eval { require highlight } or
         plan skip_all => "failed to load highlight.pm for $0";
@@ -30,7 +25,7 @@ my $orig = $str;
         is($$ref, $$lref, 'do_hl_lang matches do_hl');
 
         SKIP: {
-                my $w3m = which('w3m') or
+                my $w3m = require_cmd('w3m', 1) or
                         skip('w3m(1) missing to check output', 1);
                 my $cmd = [ $w3m, qw(-T text/html -dump -config /dev/null) ];
                 my $in = '<pre>' . $$ref . '</pre>';