Merge pull request #115 from kbucheli/fix_memory_leak

Another bugfix for memory leak [rt.cpan.org #57990] #86
cpan-authors · Mar 27, 2018 · 5d9cd34 · 5d9cd34
2 parents b38b7d4 + d706e65
commit 5d9cd34
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/lib/IPC/Run.pm b/lib/IPC/Run.pm
@@ -1144,6 +1144,12 @@ sub DESTROY {
     my IPC::Run $self = shift;
     POSIX::close $self->{DEBUG_FD} if defined $self->{DEBUG_FD};
     $self->{DEBUG_FD} = undef;
+
+    for my $kid ( @{$self->{KIDS}} ) {
+        for my $op ( @{$kid->{OPS}} ) {
+            delete $op->{FILTERS};
+        }
+    }
 }
 
 ##