FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-02 00:48:53 +00:00
Code Issues Releases Wiki Activity

10_CUL_HM:remove debug info

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@14511 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2017-06-15 06:49:12 +00:00
parent e1c11d1115
commit 98dae71568
1 changed files with 0 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fhem/FHEM/10_CUL_HM.pm
View File

@ -1088,7 +1088,6 @@ sub CUL_HM_Parse($$) {#########################################################
$mh{dst}));
if(!$mh{devH} && $mh{mTp} eq "00") { # generate device
my $sname = "HM_$mh{src}";
Log 1,"General ###111### CUL_HM Unknown device $sname is now defined";
Log3 undef, 2, "CUL_HM Unknown device $sname is now defined";
DoTrigger("global","UNDEFINED $sname CUL_HM $mh{src}");
$mh{devH} = CUL_HM_id2Hash($mh{src}); #sourcehash - changed to channel entity
@ -3126,13 +3125,10 @@ sub CUL_HM_parseCommon(@){#####################################################
}
elsif($mhp->{mTp} eq "00"){######################################
Log 1,"General ############parseme";
if ($devHlpr->{supp_Pair_Rep}){# repeated # Change noansi, don`t let the user press pair button forever if first pair try failed
$devHlpr->{supp_Pair_Rep} = 0; # noansi: reset flag, suppress only once not to lockup if device answer is not received
Log 1,"General ############parseme no more";
return "done"; # suppress handling of a repeated pair request
}
Log 1,"General ############parseme 2";
$devHlpr->{supp_Pair_Rep} = 1; # noansi: suppress next handling of a repeated pair request (if nothing else arrives in between from device)
my $paired = 0; #internal flag
@ -3143,7 +3139,6 @@ sub CUL_HM_parseCommon(@){#####################################################
my $ioOwn = InternalVal($ioN,"owner_CCU","");
my $hmPair = InternalVal($ioN,"hmPair" ,InternalVal($ioOwn,"hmPair" ,0 ));
my $hmPser = InternalVal($ioN,"hmPairSerial",InternalVal($ioOwn,"hmPairSerial",""));
Log 1,"General ############parseme 3 :$ioOwn:$hmPair:$hmPser";
if ( $hmPair ){# pairing is active
if (!$hmPser || $hmPser eq ReadingsVal($mhp->{devN},"D-serialNr","")){
@ -3154,10 +3149,6 @@ sub CUL_HM_parseCommon(@){#####################################################
."$attr{$mhp->{devN}}{subType}, "
."model $attr{$mhp->{devN}}{model} "
."serialNr ".ReadingsVal($mhp->{devN},"D-serialNr","");
Log 1,"General######CUL_HM pair: $mhp->{devN} "
."$attr{$mhp->{devN}}{subType}, "
."model $attr{$mhp->{devN}}{model} "
."serialNr ".ReadingsVal($mhp->{devN},"D-serialNr","");
CUL_HM_RemoveHMPair("hmPairForSec:$ioOwn");# just in case...
delete $ioHash->{hmPair};
delete $ioHash->{hmPairSerial};