check critical Reading settings from private modules

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5710 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/FHEM/10_CUL_HM.pm

@@ -2466,6 +2466,10 @@ sub CUL_HM_pushEvnts(){########################################################
   my ($h,$x) = ("","");
   my @evts = ();
   foreach my $e(@evtEt){
+    if(scalar(@{$e} != 3)){
+      Log 2,"CUL_HM set reading invalid:".join(",",@{$e});
+      next;
+    }
     if ($h ne ${$e}[0] || $x ne ${$e}[1]){
       push @ent,CUL_HM_UpdtReadBulk($h,$x,@evts);
       @evts = ();