X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=xt%2Fperf-msgview.t;h=3ea92ec67f063879dc58871fe9de27c16a90c5a6;hb=c29b2b7ded47def906cf00e3baad65c102304120;hp=11bd3a5d64657ff8d476e1273fd38d5f71490265;hpb=3c313f9034aac96182e2efdc2f92c40803626f32;p=public-inbox.git diff --git a/xt/perf-msgview.t b/xt/perf-msgview.t index 11bd3a5d..3ea92ec6 100644 --- a/xt/perf-msgview.t +++ b/xt/perf-msgview.t @@ -1,4 +1,4 @@ -# Copyright (C) 2019 all contributors +# Copyright (C) 2019-2020 all contributors # License: AGPL-3.0+ use strict; use warnings; @@ -18,7 +18,7 @@ if (require_git(2.19, 1)) { warn "git <2.19, cat-file lacks --unordered, locality suffers\n"; } - +require_mods qw(Plack::Util); use_ok 'Plack::Util'; my $ibx = PublicInbox::Inbox->new({ inboxdir => $inboxdir, name => 'name' }); my $git = $ibx->git; @@ -35,18 +35,19 @@ my $ctx = { my ($str, $mime, $res, $cmt, $type); my $n = 0; my $t = timeit(1, sub { + my $obuf = ''; + $ctx->{obuf} = \$obuf; + $ctx->{mhref} = '../'; while (<$fh>) { ($cmt, $type) = split / /; next if $type ne 'blob'; ++$n; $str = $git->cat_file($cmt); $mime = PublicInbox::MIME->new($str); - $res = PublicInbox::View::msg_html($ctx, $mime); - $res = $res->[2]; - while (defined($res->getline)) {} - $res->close; + PublicInbox::View::multipart_text_as_html($mime, $ctx); + $obuf = ''; } }); -diag 'msg_html took '.timestr($t)." for $n messages"; +diag 'multipart_text_as_html took '.timestr($t)." for $n messages"; ok 1; done_testing();