Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

TcpServerUtils.pm: second try to fix the addToWriteBuffer bug (Forum #114435)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@22887 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2020-09-29 17:43:13 +00:00
parent 9822ae393c
commit 5fafa161a6
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
fhem/FHEM/TcpServerUtils.pm
View File

@ -214,19 +214,21 @@ TcpServer_Close($@)
delete($selectlist{$name}); delete($selectlist{$name});
delete($hash->{FD}); # Avoid Read->Close->Write delete($hash->{FD}); # Avoid Read->Close->Write
%ntfyHash = (); %ntfyHash = ();
if($dodel) {
delete $attr{$name};
delete $defs{$name};
} else {
$hash->{stacktrace} = stacktraceAsString(1);
}
} }
if(defined($hash->{SERVERSOCKET})) { # Server if(defined($hash->{SERVERSOCKET})) { # Server
close($hash->{SERVERSOCKET}); close($hash->{SERVERSOCKET});
$name = $name . "." . $hash->{PORT}; $name = $name . "." . $hash->{PORT};
delete($selectlist{$name}); delete($selectlist{$name});
delete($hash->{FD}); # Avoid Read->Close->Write delete($hash->{FD}); # Avoid Read->Close->Write
} }
if($dodel) {
delete $attr{$name};
delete $defs{$name};
} else {
$hash->{stacktrace} = stacktraceAsString(1);
}
return undef; return undef;
} }