fix trail lenght and ->{PARTIAL}

This commit is contained in:
Marko Oldenburg 2017-02-17 08:38:29 +01:00
parent 5ab6a6d180
commit ecf15f7e33

View File

@ -693,11 +693,13 @@ sub LGTV_WebOS_ProcessRead($$) {
Log3 $name, 5, "LGTV_WebOS ($name) - Nach Sub: Laenge JSON: " . length($json) . " Content: " . $json . " Tail: " . $tail;
}
delete $hash->{PARTIAL}
$tail = ''
if(length($tail) > 30000);
$hash->{PARTIAL} = $tail;
Log3 $name, 4, "LGTV_WebOS ($name) - PARTIAL lenght: " . length($tail);
Log3 $name, 5, "LGTV_WebOS ($name) - Tail: " . $tail;
Log3 $name, 5, "LGTV_WebOS ($name) - PARTIAL: " . $hash->{PARTIAL};
}