From 65b26311c0cb437533fe2e7770fde246fe25b27e Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Fri, 22 Mar 2013 16:14:02 +0000 Subject: [PATCH] Always closing... git-svn-id: https://svn.fhem.de/fhem/trunk@2965 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/Blocking.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/Blocking.pm b/fhem/FHEM/Blocking.pm index bfbb1143a..39844c27f 100644 --- a/fhem/FHEM/Blocking.pm +++ b/fhem/FHEM/Blocking.pm @@ -90,7 +90,7 @@ BlockingInformParent($;$$) { my ($informFn, $param, $waitForRead) = @_; my $ret = undef; - $waitForRead = 1 if (undef($waitForRead)); + $waitForRead = 1 if (!defined($waitForRead)); # Write the data back, calling the function my $addr = "localhost:$defs{$telnetDevice}{PORT}"; @@ -112,9 +112,7 @@ BlockingInformParent($;$$) $ret = undef if(!defined($len)); } - if($^O =~ m/Win/) { - close($client) if($client); - } + close($client) if($client); return $ret; }