stream HTML views as much as possible

[public-inbox.git] / lib / PublicInbox / Mbox.pm

diff --git a/lib/PublicInbox/Mbox.pm b/lib/PublicInbox/Mbox.pm
index fcb266939e1707e39d3e82b70751cd3e600793a2..5f5612a4fc3c81a74bb7649a792c9d5420f6b2f7 100644 (file)
--- a/lib/PublicInbox/Mbox.pm
+++ b/lib/PublicInbox/Mbox.pm
@@ -80,6 +80,7 @@ The administrator needs to install the IO::Compress::Gzip Perl module
 to support gzipped mboxes.
 <a href="../">Return to index</a></pre></body></html>
 EOF
+       $fh->close;
 }
 
 1;
@@ -118,7 +119,7 @@ sub close {
        my ($self) = @_;
        $self->{gz}->close;
        _flush_buf($self);
-       # do not actually close $fh
+       $self->{fh}->close;
 }
 
 1;