diff --git a/FHEM/10_CUL_HM.pm b/FHEM/10_CUL_HM.pm index 54d89e8e8..f58fb448d 100755 --- a/FHEM/10_CUL_HM.pm +++ b/FHEM/10_CUL_HM.pm @@ -1584,6 +1584,7 @@ sub CUL_HM_Parse($$) {############################## my ($d1,$vp) =($1,hex($2)); # adjust_command[0..4] adj_data[0..250] $vp = int($vp/2.56+0.5); # valve position in % my $chnHash = $modules{CUL_HM}{defptr}{$dst."01"}; + $chnHash = $dhash if (!$chnHash); push @entities, CUL_HM_UpdtReadBulk($chnHash,1,"ValvePosition:$vp %", "ValveAdjCmd:".$d1); push @ack,$chnHash,$mNo."8002".$dst.$src.'0101'. diff --git a/FHEM/98_HMinfo.pm b/FHEM/98_HMinfo.pm index c22e02f75..cdcd2d4e4 100644 --- a/FHEM/98_HMinfo.pm +++ b/FHEM/98_HMinfo.pm @@ -151,7 +151,6 @@ sub HMinfo_regCheck(@) { ###################################################### if ( !$ehash->{READINGS}{$rNm} || !$ehash->{READINGS}{$rNm}{VAL}) {push @mReg, $rNm;} elsif ( $ehash->{READINGS}{$rNm}{VAL} !~ m/00:00/){push @iReg, $rNm;} - if ($ehash->{helper}{shadowReg} && keys %{$ehash->{helper}{shadowReg}}){push @iReg, $rNm;} } push @regChPend,$eName if ($ehash->{helper}{shadowReg} && keys %{$ehash->{helper}{shadowReg}}); @@ -561,7 +560,7 @@ sub HMinfo_SetFn($@) {######################################################### for (1..9){ my ($x) = $pl[$_] =~ /(\d+)/; - $plSum[$_] += $x; + $plSumf[$_] += $x; } if ($type eq "short"){ push @paramList, sprintf("%-20s%-17s|%-10s|%-10s|%-10s#%-10s|%-10s|%-10s|%-10s",