diff --git a/fhem/FHEM/Blocking.pm b/fhem/FHEM/Blocking.pm
index c731aa931..431cf842a 100644
--- a/fhem/FHEM/Blocking.pm
+++ b/fhem/FHEM/Blocking.pm
@@ -77,10 +77,10 @@ BlockingCall($$@)
 
   # Child here
 
-  foreach my $d (sort keys %defs) {   # Close all open TCP-Server sockets
+  foreach my $d (sort keys %defs) {   # Close all kind of FD
     my $h = $defs{$d};
-    next if(!$h->{SERVERSOCKET});
-    TcpServer_Close($h);
+    TcpServer_Close($h) if($h->{SERVERSOCKET});
+    DevIo_CloseDev($h)  if($h->{DeviceName});
   }
   
   no strict "refs";