From 1863566363c75331d1e8cdf2a34e43cee5529479 Mon Sep 17 00:00:00 2001 From: Ole Tange Date: Sat, 22 Oct 2016 13:32:59 +0200 Subject: [PATCH] parallel: Redirect STDERR temporarily, so errors on MacOS X are ignored. --- src/parallel | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/parallel b/src/parallel index 0a672081..ff54c741 100755 --- a/src/parallel +++ b/src/parallel @@ -7725,8 +7725,15 @@ sub start { "perl -MIPC::Open3 -e ". ::shell_quote_scalar_default($script) ); + # Redirect STDERR temporarily, + # so errors on MacOS X is ignored. + open my $saveerr, ">&STDERR"; + open STDERR, '>', "/dev/null"; + # Run the test ::debug("init",qq{bash -c $bash 2>/dev/null}); qx{ bash -c $bash 2>/dev/null }; + open STDERR, ">&", $saveerr; + if(-e $name) { # Does not support open3(x,x,x,"-") # or does not have bash: