summaryrefslogtreecommitdiff
path: root/Echolot
diff options
context:
space:
mode:
Diffstat (limited to 'Echolot')
-rw-r--r--Echolot/Tools.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/Echolot/Tools.pm b/Echolot/Tools.pm
index fa96831..157a61a 100644
--- a/Echolot/Tools.pm
+++ b/Echolot/Tools.pm
@@ -318,7 +318,7 @@ sub readwrite_gpg($$$$$) {
my ($stdout, $stderr, $status) = ("", "", "");
my ($readyr, $readyw, $written);
- while ($sout->count() > 0) {
+ while ($sout->count() > 0 || (defined($sin) && ($sin->count() > 0))) {
Echolot::Log::trace("select waiting for ".($sout->count())." fds.");
($readyr, $readyw, undef) = IO::Select::select($sout, $sin, undef, 42);
Echolot::Log::trace("ready: write: ".(scalar @$readyw)."; read: ".(scalar @$readyr));