X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=xt%2Feml_check_limits.t;h=a6d010af0518f3f8866eebf0ee018bd336147f44;hb=1c3e60b66e01df89afdf74990a849a5a7386f9c7;hp=39de047645b378de92d4d0d706790fe857323714;hpb=cd8cda10c9687533949a8a358fd7b858f704da6e;p=public-inbox.git
diff --git a/xt/eml_check_limits.t b/xt/eml_check_limits.t
index 39de0476..a6d010af 100644
--- a/xt/eml_check_limits.t
+++ b/xt/eml_check_limits.t
@@ -1,6 +1,8 @@
#!perl -w
-# Copyright (C) 2020 all contributors
+# Copyright (C) 2020-2021 all contributors
# License: AGPL-3.0+
+use strict;
+use v5.10.1;
use Test::More;
use PublicInbox::TestCommon;
use PublicInbox::Eml;
@@ -13,7 +15,10 @@ require_git(2.19); # for --unordered
require_mods(qw(BSD::Resource));
BSD::Resource->import(qw(getrusage));
my $cls = $ENV{TEST_CLASS};
-require_mods($cls) if $cls;
+if ($cls) {
+ diag "TEST_CLASS=$cls";
+ require_mods($cls);
+}
$cls //= 'PublicInbox::Eml';
my $inboxdir = $ENV{GIANT_INBOX_DIR};
plan skip_all => "GIANT_INBOX_DIR not defined for $0" unless $inboxdir;
@@ -55,7 +60,6 @@ my $cat_cb = sub {
};
my $t = timeit(1, sub {
- $git->cat_async_begin;
my ($blob, $type);
while (<$fh>) {
($blob, $type) = split / /;
@@ -63,7 +67,7 @@ my $t = timeit(1, sub {
++$n;
$git->cat_async($blob, $cat_cb);
}
- $git->cat_async_wait;
+ $git->async_wait_all;
});
is($m, $n, 'scanned all messages');
diag "$$ $inboxdir took ".timestr($t)." for $n <=> $m messages";