2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

90_SIGNALduino_un.pm: perlcritic update

git-svn-id: https://svn.fhem.de/fhem/trunk@22410 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
sidey79 2020-07-16 20:10:41 +00:00
parent 748ff279d9
commit 533d5ef629

View File

@ -102,7 +102,7 @@ SIGNALduino_un_Parse($$)
my $bitData= unpack("B$blen", pack("H$hlen", $rawData));
Log3 $hash, 4, "$name converted to bits: $bitData";
if ($protocol == "21" && length($bitData)>=32) ##Einhell doorshutter
if ($protocol == 21 && length($bitData)>=32) ##Einhell doorshutter
{
Log3 $hash, 4, "$name / Einhell doorshutter received";
@ -115,7 +115,7 @@ SIGNALduino_un_Parse($$)
Log3 $hash, 4, "$name found doorshutter from Einhell. id=$id, channel=$channel, direction=$dir";
} elsif ($protocol == "23" && length($bitData)>=32) ##Perl Sensor
} elsif ($protocol == 23 && length($bitData)>=32) ##Perl Sensor
{
my $SensorTyp = "perl NC-7367?";
my $id = oct ("0b".substr($bitData,4,4));