From 264042048cd1cbc039e42b7a9ea80e80c94e7206 Mon Sep 17 00:00:00 2001
From: Eric Wong <e@80x24.org>
Date: Wed, 28 Dec 2022 10:05:33 +0000
Subject: rproxy: close pipes in deterministic order

And always close our write end first so we can shut down
addr2line slightly sooner.
---
 lib/Devel/Mwrap/Rproxy.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Devel/Mwrap/Rproxy.pm b/lib/Devel/Mwrap/Rproxy.pm
index e14cd05..f5bf2cc 100644
--- a/lib/Devel/Mwrap/Rproxy.pm
+++ b/lib/Devel/Mwrap/Rproxy.pm
@@ -159,7 +159,7 @@ sub lookup {
 
 sub DESTROY {
 	my ($self) = @_;
-	delete @$self{qw(rd wr)};
+	close($_) for (delete @$self{qw(wr rd)});
 	waitpid(delete $self->{pid}, 0);
 }
 
-- 
cgit v1.2.3-24-ge0c7