X-Git-Url: http://git.efficios.com/?p=lttng-tools.git;a=blobdiff_plain;f=tests%2Futils%2Futils.sh;h=0278bcf5e8eebc006bb1e2d7b10fc39e4e8e1f7e;hp=71ddaa2cb5ea5a5c0e814eb307d201dcb2189817;hb=27b667f7fccef66cc3490615757d969191df3d94;hpb=24e5947983108212f72332e9410feaaa7dd97651

diff --git a/tests/utils/utils.sh b/tests/utils/utils.sh
index 71ddaa2cb..0278bcf5e 100644
--- a/tests/utils/utils.sh
+++ b/tests/utils/utils.sh
@@ -68,9 +68,21 @@ function full_cleanup ()
 	trap - SIGTERM && kill -- -$$
 }
 
+function null_pipes ()
+{
+	exec 0>/dev/null
+	exec 1>/dev/null
+	exec 2>/dev/null
+}
 
 trap full_cleanup SIGINT SIGTERM
 
+# perl prove closes its child pipes before giving it a chance to run its
+# signal trap handlers. Redirect pipes to /dev/null if SIGPIPE is caught
+# to allow those trap handlers to proceed.
+
+trap null_pipes SIGPIPE
+
 function print_ok ()
 {
 	# Check if we are a terminal