From 8f9c3ee81fce3e2913a604c106f57a628a23f92d Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Tue, 12 Jul 2016 08:44:10 +0000
Subject: [PATCH] DevIo.pm: avoiding partial "endless" loops (Forum #53309)

git-svn-id: https://svn.fhem.de/fhem/trunk@11786 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/DevIo.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fhem/FHEM/DevIo.pm b/fhem/FHEM/DevIo.pm
index 9a1633a30..c7948660b 100644
--- a/fhem/FHEM/DevIo.pm
+++ b/fhem/FHEM/DevIo.pm
@@ -306,6 +306,7 @@ DevIo_OpenDev($$$;$)
       return &$doCb(undef); # Forum 53309
     }
 
+    delete($readyfnlist{"$name.$dev"});
     my $timeout = $hash->{TIMEOUT} ? $hash->{TIMEOUT} : 3;
     my $doTcpTail = sub($) {
       my ($conn) = @_;
@@ -323,7 +324,6 @@ DevIo_OpenDev($$$;$)
 
       $hash->{TCPDev} = $conn;
       $hash->{FD} = $conn->fileno();
-      delete($readyfnlist{"$name.$dev"});
       $selectlist{"$name.$dev"} = $hash;
       return 1;
     };