From 337311f19ac85e6919d04f27ceb05cf10b929dfd 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://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@2965 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/Blocking.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/FHEM/Blocking.pm b/FHEM/Blocking.pm index bfbb1143a..39844c27f 100644 --- a/FHEM/Blocking.pm +++ b/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; }