fix pack syntax
This commit is contained in:
parent
69865d0ea0
commit
2fdde0e7a7
@ -49,7 +49,7 @@ use JSON;
|
|||||||
use Blocking;
|
use Blocking;
|
||||||
|
|
||||||
|
|
||||||
my $version = "0.0.11";
|
my $version = "0.0.13";
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@ -674,7 +674,7 @@ sub CometBlueBTLE_HandleFirmware($$) {
|
|||||||
|
|
||||||
Log3 $name, 3, "CometBlueBTLE ($name) - FlowerSens handle $gatttChar{'firmware'}";
|
Log3 $name, 3, "CometBlueBTLE ($name) - FlowerSens handle $gatttChar{'firmware'}";
|
||||||
|
|
||||||
$readings{'firmware'} = pack('H*'.$notification);
|
$readings{'firmware'} = pack('H*',$notification);
|
||||||
|
|
||||||
$hash->{helper}{CallBattery} = 0;
|
$hash->{helper}{CallBattery} = 0;
|
||||||
return \%readings;
|
return \%readings;
|
||||||
@ -690,7 +690,7 @@ sub CometBlueBTLE_HandleDevicename($$) {
|
|||||||
|
|
||||||
Log3 $name, 3, "CometBlueBTLE ($name) - FlowerSens handle $gatttChar{'devicename'}";
|
Log3 $name, 3, "CometBlueBTLE ($name) - FlowerSens handle $gatttChar{'devicename'}";
|
||||||
|
|
||||||
$readings{'devicename'} = pack('H*'.$notification);
|
$readings{'devicename'} = pack('H*',$notification);
|
||||||
|
|
||||||
$hash->{helper}{CallBattery} = 0;
|
$hash->{helper}{CallBattery} = 0;
|
||||||
return \%readings;
|
return \%readings;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user