From 021c91f08c1bf4f3178293fb54f4e7da51a2c28f Mon Sep 17 00:00:00 2001
From: rudolfkoenig <rudolfkoenig@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sun, 8 Nov 2009 14:32:00 +0000
Subject: [PATCH] Disconnect fix

git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@460 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 FHEM/00_CUL.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/FHEM/00_CUL.pm b/FHEM/00_CUL.pm
index f3a96aeae..b463dd2d6 100755
--- a/FHEM/00_CUL.pm
+++ b/FHEM/00_CUL.pm
@@ -509,8 +509,7 @@ CUL_ReadAnswer($$$)
       if($nfound < 0) {
         next if ($! == EAGAIN() || $! == EINTR() || $! == 0);
         my $err = $!;
-        close($hash->{FD});
-        undef($hash->{FD});
+        CUL_Disconnected($hash);
         return("CUL_ReadAnswer $arg: $err", undef);
       }
       return ("Timeout reading answer for get $arg", undef)