diff options
author | Peter Palfrader <peter@palfrader.org> | 2004-04-26 13:23:28 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2004-04-26 13:23:28 +0000 |
commit | 902c858f19a42d39a88547767fe0d19af4e84770 (patch) | |
tree | 568abc72f99078f5eccb9290c6369e20e75ab295 /Echolot/Tools.pm | |
parent | cf61926ae6dfba69045a50776d402ebb37c71e93 (diff) |
Filter out mixmaster outputs to stderr that are no problem
Diffstat (limited to 'Echolot/Tools.pm')
-rw-r--r-- | Echolot/Tools.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Echolot/Tools.pm b/Echolot/Tools.pm index 46b7f3e..0264cfd 100644 --- a/Echolot/Tools.pm +++ b/Echolot/Tools.pm @@ -288,14 +288,14 @@ sub readwrite_gpg($$$$$) { $inputfd->blocking(0); $stdoutfd->blocking(0); - $statusfd->blocking(0); + $statusfd->blocking(0) if defined $statusfd; $stderrfd->blocking(0); $sout->add($stdoutfd); $sout->add($stderrfd); - $sout->add($statusfd); + $sout->add($statusfd) if defined $statusfd; $sin->add($inputfd); - Echolot::Log::debug("input is $inputfd; output is $stdoutfd; err is $stderrfd; status is $statusfd."); + Echolot::Log::debug("input is $inputfd; output is $stdoutfd; err is $stderrfd; status is ".(defined $statusfd ? $statusfd : 'undef')."."); my ($stdout, $stderr, $status) = ("", "", ""); @@ -330,7 +330,7 @@ sub readwrite_gpg($$$$$) { $stdout .= <$rfd>; next; } - if ($rfd == $statusfd) { + if (defined $statusfd && $rfd == $statusfd) { $status .= <$rfd>; next; } |