From 8e4c329c4ccde1ecd3efc08d7346ad17b1f4b687 Mon Sep 17 00:00:00 2001 From: Damian <> Date: Tue, 3 May 2022 16:28:02 +0000 Subject: [PATCH] 98_DOIF.pm: allow reading 0 git-svn-id: https://svn.fhem.de/fhem/trunk@26020 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_DOIF.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/fhem/FHEM/98_DOIF.pm b/fhem/FHEM/98_DOIF.pm index f56592928..4840694cf 100644 --- a/fhem/FHEM/98_DOIF.pm +++ b/fhem/FHEM/98_DOIF.pm @@ -972,7 +972,7 @@ sub AggrIntDoIf foreach my $reading ((defined $readingRegex) ? grep {/$readingRegex/} keys %{$defs{$name}{READINGS}} : $reading) { $value=""; $number=""; - if ($reading) { + if (defined($reading)) { if (defined $defs{$name}{READINGS}{$reading}) { $value=$defs{$name}{READINGS}{$reading}{VAL}; $number = ($value =~ /(-?\d+(\.\d+)?)/ ? $1 : 0); @@ -1641,7 +1641,7 @@ sub ReplaceReadingDoIf $format=$3; } if ($name) { - if ($reading) { + if (defined ($reading)) { if (substr($reading,0,1) eq "\?") { $notifyExp=substr($reading,1); return("::EventDoIf('$name',".'$hash,'."'$notifyExp',1)","",$name,undef,undef); @@ -1775,7 +1775,7 @@ sub AddRegexpTriggerDoIf $reading="" if (!defined($reading)); my $regexpid='"'.$regexp.'"'; if ($dev) { - if ($reading){ + if (defined ($reading)){ $hash->{Regex}{$type}{$dev}{$element}{$reading}=(($reading =~ "^\&") ? "\^$dev\$":"\^$dev\$:\^$reading: "); } elsif ($regexp) { $hash->{Regex}{$type}{$dev}{$element}{$regexpid}="\^$dev\$:$regexp";