X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=xt%2Fcmp-msgstr.t;h=900127c76cae85dcbc033308105196a4e3c220fd;hb=c029c9e085ca1f1b1319e566157e04f9c972c55b;hp=6bae0f66e83f6b1a55c25dee568f84dfa2409df7;hpb=fd966061df6a61104935984bed7c28a461a124ff;p=public-inbox.git diff --git a/xt/cmp-msgstr.t b/xt/cmp-msgstr.t index 6bae0f66..900127c7 100644 --- a/xt/cmp-msgstr.t +++ b/xt/cmp-msgstr.t @@ -1,5 +1,5 @@ #!perl -w -# Copyright (C) 2020 all contributors +# Copyright (C) 2020-2021 all contributors # License: AGPL-3.0+ use strict; use Test::More; @@ -60,7 +60,7 @@ my $cmp = sub { my $dig = $dig_cls->new; $dig->add($part); push @$cmp_arg, "M: ".$dig->hexdigest; - push @$cmp_arg, "B: ".bytes::length($part); + push @$cmp_arg, "B: ".length($part); } else { $part =~ s/\s+\z//s; push @$cmp_arg, "X: ".$part; @@ -93,7 +93,6 @@ my $git_cb = sub { diag xqx([qw(git diff), "$tmpdir/mime", "$tmpdir/eml"]); } }; -$git->cat_async_begin; my $t = timeit(1, sub { while (<$fh>) { my ($oid, $type) = split / /;