FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

98_DOIF.pm fixed: error: Reading/Internal does not exist at zero

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@7147 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
damian-s 2014-12-06 15:48:42 +00:00
parent eb92629b5d
commit 44ffadeaf8
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/98_DOIF.pm
View File

@ -215,8 +215,8 @@ sub ReplaceAllReadingsDoIf($$$$)
($block,$err,$device,$reading,$internal)=ReplaceReadingDoIf($block);
return ($block,$err) if ($err);
if ($eval) {
return ($block,"reading does not exist: [$device:$reading]") if (defined ($reading) and !$defs{$device}{READINGS}{$reading});
return ($block,"internal does not exist: [$device:$internal]") if (defined ($internal) and !$defs{$device}{$internal});
return ($block,"reading does not exist: [$device:$reading]") if (defined ($reading) and !defined($defs{$device}{READINGS}{$reading}));
return ($block,"internal does not exist: [$device:$internal]") if (defined ($internal) and !defined($defs{$device}{$internal}));
my $ret = eval $block;
return($block." ",$@) if ($@);
$block=$ret;
@ -487,13 +487,13 @@ DOIF_CheckCond($$)
if (defined ($hash->{readings}{$condition})) {
foreach my $devReading (split(/ /,$hash->{readings}{$condition})) {
($device,$reading)=(split(":",$devReading));
return (0,"reading does not exist: [$device:$reading]") if ($devReading and !$defs{$device}{READINGS}{$reading});
return (0,"reading does not exist: [$device:$reading]") if ($devReading and !defined($defs{$device}{READINGS}{$reading}));
}
}
if (defined ($hash->{internals}{$condition})) {
foreach my $devInternal (split(/ /,$hash->{internals}{$condition})) {
($device,$internal)=(split(":",$devInternal));
return (0,"internal does not exist: [$device:$internal]") if ($devInternal and !$defs{$device}{$internal});
return (0,"internal does not exist: [$device:$internal]") if ($devInternal and !defined($defs{$device}{$internal}));
}
}
my $ret = eval $hash->{condition}{$condition};