From aaabe5a13da0a75bc5b32ab005e0b27714947de8 Mon Sep 17 00:00:00 2001 From: andi291 Date: Fri, 28 Apr 2017 07:26:09 +0000 Subject: [PATCH] 86_Robonect.pm: ABU 20170427 fixed numerich undefs git-svn-id: https://svn.fhem.de/fhem/trunk@14124 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/86_Robonect.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/86_Robonect.pm b/fhem/FHEM/86_Robonect.pm index 5f3219546..829f46bc6 100644 --- a/fhem/FHEM/86_Robonect.pm +++ b/fhem/FHEM/86_Robonect.pm @@ -22,6 +22,7 @@ # ABU 20170301 fixed hybernate-check in set # ABU 20170406 fixed hybernate-check in timer # ABU 20170422 fixed doku +# ABU 20170427 fixed numerich undefs package main; @@ -562,7 +563,7 @@ sub Robonect_callback ($) readingsBulkUpdate($hash, $key, $value); $value = 0; ($key, $value) = Robonect_decodeContent ($hash, $answer, "status", "duration", undef); - readingsBulkUpdate($hash, $key, sprintf ("%d", $value/3600)); + readingsBulkUpdate($hash, $key, sprintf ("%d", $value/3600)) if (defined($value) and ($value =~ m/(?:\d*\.)?\d+/)); ($key, $value) = Robonect_decodeContent ($hash, $answer, "status", "hours", undef); readingsBulkUpdate($hash, $key, $value); @@ -578,7 +579,7 @@ sub Robonect_callback ($) ($key, $value) = Robonect_decodeContent ($hash, $answer, "wlan", "signal", undef); readingsBulkUpdate($hash, $key, $value); - if (defined($value)) + if (defined($value) and ($value =~ m/(?:\d*\.)?\d+/)) { $value = sprintf ("%d", ($value + 95) / 0.6); readingsBulkUpdate($hash, $key . "-prozent", $value);