X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=xt%2Fperf-msgview.t;h=9375977aac883c5c730537da045e99a77828ab00;hb=2710d3105e70ff467eff9e977325628b4e9dd1c5;hp=11bd3a5d64657ff8d476e1273fd38d5f71490265;hpb=3c313f9034aac96182e2efdc2f92c40803626f32;p=public-inbox.git diff --git a/xt/perf-msgview.t b/xt/perf-msgview.t index 11bd3a5d..9375977a 100644 --- a/xt/perf-msgview.t +++ b/xt/perf-msgview.t @@ -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,18 @@ my $ctx = { my ($str, $mime, $res, $cmt, $type); my $n = 0; my $t = timeit(1, sub { + my $obuf = ''; + $ctx->{obuf} = \$obuf; 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();