diff options
| author | Eric Wong <e@80x24.org> | 2021-09-21 07:41:49 +0000 |
|---|---|---|
| committer | Eric Wong <e@80x24.org> | 2021-09-21 19:18:34 +0000 |
| commit | 0c385e6500f26babc47a0768b730ea38e290a5f5 (patch) | |
| tree | 2e5ae0f665c10a47e7d532fe04fb2a58c0c75d52 /lib/PublicInbox/TestCommon.pm | |
| parent | eed4017d3361220e7533d786565c3633e305cc16 (diff) | |
| download | public-inbox-0c385e6500f26babc47a0768b730ea38e290a5f5.tar.gz | |
No reason not to support them, since there's more public-inbox-nntpd instances than -imapd instances, currently.
Diffstat (limited to 'lib/PublicInbox/TestCommon.pm')
| -rw-r--r-- | lib/PublicInbox/TestCommon.pm | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/lib/PublicInbox/TestCommon.pm b/lib/PublicInbox/TestCommon.pm index 0ee4b228..9e152394 100644 --- a/lib/PublicInbox/TestCommon.pm +++ b/lib/PublicInbox/TestCommon.pm @@ -18,7 +18,7 @@ BEGIN { run_script start_script key2sub xsys xsys_e xqx eml_load tick have_xapian_compact json_utf8 setup_public_inboxes create_inbox tcp_host_port test_lei lei lei_ok $lei_out $lei_err $lei_opt - test_httpd xbail require_cmd); + test_httpd xbail require_cmd is_xdeeply); require Test::More; my @methods = grep(!/\W/, @Test::More::EXPORT); eval(join('', map { "*$_=\\&Test::More::$_;" } @methods)); @@ -520,6 +520,13 @@ sub json_utf8 () { state $x = ref(PublicInbox::Config->json)->new->utf8->canonical; } +sub is_xdeeply ($$$) { + my ($x, $y, $desc) = @_; + my $ok = is_deeply($x, $y, $desc); + diag explain([$x, '!=', $y]) if !$ok; + $ok; +} + sub test_lei { SKIP: { my ($cb) = pop @_; @@ -590,7 +597,7 @@ SKIP: { my $f = "$daemon_xrd/lei/errors.log"; open my $fh, '<', $f or BAIL_OUT "$f: $!"; my @l = <$fh>; - is_deeply(\@l, [], + is_xdeeply(\@l, [], "$t daemon XDG_RUNTIME_DIR/lei/errors.log empty"); } }; # SKIP if missing git 2.6+ || Xapian || SQLite || json |