diff options
Diffstat (limited to 'lib/PublicInbox/ProcessPipe.pm')
-rw-r--r-- | lib/PublicInbox/ProcessPipe.pm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lib/PublicInbox/ProcessPipe.pm b/lib/PublicInbox/ProcessPipe.pm index eade524c..e088c105 100644 --- a/lib/PublicInbox/ProcessPipe.pm +++ b/lib/PublicInbox/ProcessPipe.pm @@ -15,13 +15,12 @@ sub READ { sysread($_[0]->{fh}, $_[1], $_[2], $_[3] || 0) } sub READLINE { readline($_[0]->{fh}) } -sub CLOSE { close($_[0]->{fh}) } +sub CLOSE { delete($_[0]->{fh}) } sub FILENO { fileno($_[0]->{fh}) } sub DESTROY { - my $fh = delete($_[0]->{fh}); - close $fh if $fh; + delete($_[0]->{fh}); waitpid($_[0]->{pid}, 0); } |