about summary refs log tree commit homepage
path: root/lib/PublicInbox/Mbox.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/Mbox.pm')
-rw-r--r--lib/PublicInbox/Mbox.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/PublicInbox/Mbox.pm b/lib/PublicInbox/Mbox.pm
index fcb26693..5f5612a4 100644
--- 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;