From 80b3de88d29e3d9944a23c827d70ba4f03c7b88b Mon Sep 17 00:00:00 2001
From: damian-s <damian-s@2b470e98-0d58-463d-a4d8-8e2adae1ed80>
Date: Sat, 6 Dec 2014 15:48:42 +0000
Subject: [PATCH] 98_DOIF.pm fixed: error: Reading/Internal does not exist at
 zero

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@7147 2b470e98-0d58-463d-a4d8-8e2adae1ed80
---
 fhem/FHEM/98_DOIF.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/fhem/FHEM/98_DOIF.pm b/fhem/FHEM/98_DOIF.pm
index 7ee4c49c5..b94b22fa8 100644
--- a/fhem/FHEM/98_DOIF.pm
+++ b/fhem/FHEM/98_DOIF.pm
@@ -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};