decode_json in a eval

This commit is contained in:
Marko Oldenburg 2018-03-19 10:45:38 +01:00
parent dc4a6be940
commit a3b535706c

View File

@ -477,7 +477,7 @@ sub NUKIBridge_ResponseProcessing($$$) {
return "NUKIBridge ($name) - invalid json detected: $json"; return "NUKIBridge ($name) - invalid json detected: $json";
} }
my $decode_json = eval{decode_json($json)}; $decode_json = eval{decode_json($json)};
if($@){ if($@){
Log3 $name, 3, "NUKIBridge ($name) - JSON error while request: $@"; Log3 $name, 3, "NUKIBridge ($name) - JSON error while request: $@";
return; return;