]> Sergey Matveev's repositories - public-inbox.git/blobdiff - lib/PublicInbox/SearchView.pm
www: use PerlIO::scalar (zfh) for buffering
[public-inbox.git] / lib / PublicInbox / SearchView.pm
index b18947ee1e94d3d32d8c2af0ce4de86bdcd953e7..8932c73da5671429e23ca60cabf9801d296c2f04 100644 (file)
@@ -331,10 +331,10 @@ sub mset_thread {
 # callback for PublicInbox::WwwStream::getline
 sub mset_thread_i {
        my ($ctx, $eml) = @_;
-       $ctx->zadd($ctx->html_top) if exists $ctx->{-html_tip};
+       print { $ctx->zfh } $ctx->html_top if exists $ctx->{-html_tip};
        $eml and return PublicInbox::View::eml_entry($ctx, $eml);
        my $smsg = shift @{$ctx->{msgs}} or
-               $ctx->zmore(${delete($ctx->{skel})});
+               print { $ctx->zfh } ${delete($ctx->{skel})};
        $smsg;
 }