fix trail lenght and ->{PARTIAL}

2017-02-17 08:38:29 +01:00
parent 5ab6a6d180
commit ecf15f7e33
1 changed files with 3 additions and 1 deletions
--- a/82_LGTV_WebOS.pm
+++ b/82_LGTV_WebOS.pm
@@ -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};
 }