mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-08 01:14:19 +00:00
10_ZWave.pm: fix some == "" errors (Forum #110138)
git-svn-id: https://svn.fhem.de/fhem/trunk@21658 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
528b49e42b
commit
2d96599ccb
@ -2657,26 +2657,26 @@ ZWave_ccsParse($$)
|
|||||||
{
|
{
|
||||||
my ($t, $p) = @_;
|
my ($t, $p) = @_;
|
||||||
|
|
||||||
return "ccsChanged:$p" if($t == "05");
|
return "ccsChanged:$p" if($t eq '05');
|
||||||
|
|
||||||
if($t == "08" && $p =~ m/^(..)(..)$/) {
|
if($t eq '08' && $p =~ m/^(..)(..)$/) {
|
||||||
my $ret = ($1 eq "00" ? "no" : ($1 eq "01" ? "temporary" : "permanent"));
|
my $ret = ($1 eq '00' ? 'no' : ($1 eq '01' ? 'temporary' : 'permanent'));
|
||||||
$ret .= ", ". ($2 eq "79" ? "frost protection" :
|
$ret .= ", ". ($2 eq "79" ? 'frost protection' :
|
||||||
($2 eq "7a" ? "energy saving" : "unused"));
|
($2 eq "7a" ? 'energy saving' : 'unused'));
|
||||||
return "ccsOverride:$ret";
|
return "ccsOverride:$ret";
|
||||||
}
|
}
|
||||||
|
|
||||||
if($t == "03") {
|
if($t eq '03') {
|
||||||
$p =~ /^(..)(.*$)/;
|
$p =~ /^(..)(.*$)/;
|
||||||
my $n = "ccs_".$zwave_wd[hex($1)];
|
my $n = 'ccs_'.$zwave_wd[hex($1)];
|
||||||
$p = $2;
|
$p = $2;
|
||||||
my @v;
|
my @v;
|
||||||
while($p =~ m/^(..)(..)(..)(.*)$/) {
|
while($p =~ m/^(..)(..)(..)(.*)$/) {
|
||||||
last if($3 eq "7f"); # unused
|
last if($3 eq '7f'); # unused
|
||||||
$p = $4;
|
$p = $4;
|
||||||
my $t = hex($3);
|
my $t = hex($3);
|
||||||
$t = ($t == 0x7a ? "energySave" : $t >= 0x80 ? -(255-$t)/10 : $t/10);
|
$t = ($t == 0x7a ? 'energySave' : $t >= 0x80 ? -(255-$t)/10 : $t/10);
|
||||||
push @v, sprintf("%02d:%02d %0.1f", hex($1), hex($2), $t);
|
push @v, sprintf('%02d:%02d %0.1f', hex($1), hex($2), $t);
|
||||||
}
|
}
|
||||||
return "$n:".(@v ? join(" ",@v) : "N/A");
|
return "$n:".(@v ? join(" ",@v) : "N/A");
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user