mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-20 07:16:03 +00:00
98_HMInfo:correct configCheck
git-svn-id: https://svn.fhem.de/fhem/trunk@17138 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
2b0b56d296
commit
6fcc832dfd
@ -559,8 +559,8 @@ sub HMinfo_peerCheck(@) { #####################################################
|
|||||||
elsif($chn eq "04"){
|
elsif($chn eq "04"){
|
||||||
# compare templist template are identical and boost is same
|
# compare templist template are identical and boost is same
|
||||||
my $rtCn = CUL_HM_id2Name(substr($pId,0,6)."04");
|
my $rtCn = CUL_HM_id2Name(substr($pId,0,6)."04");
|
||||||
my $ob = CUL_HM_Get($defs{$eName},$eName,"regVal","boostPeriod");
|
my $ob = CUL_HM_Get($defs{$eName},$eName,"regVal","boostPeriod",0,0);
|
||||||
my $pb = CUL_HM_Get($defs{$rtCn} ,$rtCn ,"regVal","boostPeriod");
|
my $pb = CUL_HM_Get($defs{$rtCn} ,$rtCn ,"regVal","boostPeriod",0,0);
|
||||||
my $ot = AttrVal($eName,"tempListTmpl","--");
|
my $ot = AttrVal($eName,"tempListTmpl","--");
|
||||||
my $pt = AttrVal($rtCn ,"tempListTmpl","--");
|
my $pt = AttrVal($rtCn ,"tempListTmpl","--");
|
||||||
push @peerIDsTeamRT,$eName." team:$rtCn boost differ $ob / $pb" if ($ob ne $pb);
|
push @peerIDsTeamRT,$eName." team:$rtCn boost differ $ob / $pb" if ($ob ne $pb);
|
||||||
@ -581,8 +581,8 @@ sub HMinfo_peerCheck(@) { #####################################################
|
|||||||
else{
|
else{
|
||||||
# compare templist template are identical and boost is same
|
# compare templist template are identical and boost is same
|
||||||
my $rtCn = CUL_HM_id2Name(substr($pId,0,6)."04");
|
my $rtCn = CUL_HM_id2Name(substr($pId,0,6)."04");
|
||||||
my $ob = CUL_HM_Get($defs{$eName},$eName,"regVal","boostPeriod");
|
my $ob = CUL_HM_Get($defs{$eName},$eName,"regVal","boostPeriod",0,0);
|
||||||
my $pb = CUL_HM_Get($defs{$rtCn} ,$rtCn ,"regVal","boostPeriod");
|
my $pb = CUL_HM_Get($defs{$rtCn} ,$rtCn ,"regVal","boostPeriod",0,0);
|
||||||
my $ot = AttrVal($eName,"tempListTmpl","--");
|
my $ot = AttrVal($eName,"tempListTmpl","--");
|
||||||
my $pt = AttrVal($rtCn ,"tempListTmpl","--");
|
my $pt = AttrVal($rtCn ,"tempListTmpl","--");
|
||||||
push @peerIDsTeamRT,$eName." team:$rtCn boost differ $ob / $pb" if ($ob ne $pb);
|
push @peerIDsTeamRT,$eName." team:$rtCn boost differ $ob / $pb" if ($ob ne $pb);
|
||||||
@ -1192,7 +1192,6 @@ sub HMinfo_GetFn($@) {#########################################################
|
|||||||
$plSum[$c] +=$cnt;
|
$plSum[$c] +=$cnt;
|
||||||
}
|
}
|
||||||
else{
|
else{
|
||||||
Log 1,"General $dName: $c : $_" if($_ !~ m/-/);#if ($c == 8);
|
|
||||||
}
|
}
|
||||||
$c++;
|
$c++;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user