FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 23:06:37 +00:00
Code Issues Releases Wiki Activity

16_STACKABLE_CC.pm: correct function naming to avoid WARNINGS (Forum #96630)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@18467 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2019-01-31 08:02:51 +00:00
parent cb98e5da5f
commit 41918bcf0d
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
fhem/FHEM/16_STACKABLE_CC.pm
View File

@ -27,9 +27,9 @@ STACKABLE_CC_Initialize($)
$hash->{noRawInform} = 1; # Our message was already sent as raw. $hash->{noRawInform} = 1; # Our message was already sent as raw.
$hash->{noAutocreatedFilelog} = 1; $hash->{noAutocreatedFilelog} = 1;
$hash->{IOOpenFn} = "STACKABLE_IOOpenFn"; $hash->{IOOpenFn} = "STACKABLE_CC_IOOpenFn";
$hash->{IOReadFn} = "STACKABLE_IOReadFn"; $hash->{IOReadFn} = "STACKABLE_CC_IOReadFn";
$hash->{IOWriteFn} = "STACKABLE_IOWriteFn"; $hash->{IOWriteFn} = "STACKABLE_CC_IOWriteFn";
} }
##################################### #####################################
@ -135,7 +135,7 @@ STACKABLE_CC_Parse($$)
delete $th->{IOReadFn}; delete $th->{IOReadFn};
$th->{IODevRxBuffer} = pack("H*", $msg); $th->{IODevRxBuffer} = pack("H*", $msg);
CallFn($th->{NAME}, "ReadFn", $th); CallFn($th->{NAME}, "ReadFn", $th);
$th->{IOReadFn} = "STACKABLE_IOReadFn"; $th->{IOReadFn} = "STACKABLE_CC_IOReadFn";
} else { } else {
Log 1, "$name: no TCM device assigned"; Log 1, "$name: no TCM device assigned";
} }
@ -171,17 +171,17 @@ STACKABLE_CC_Undef($$)
} }
sub sub
STACKABLE_IOOpenFn($) STACKABLE_CC_IOOpenFn($)
{ {
my ($hash) = @_; my ($hash) = @_;
$hash->{FD} = $hash->{IODev}{IODev}{FD}; # Lets fool the TCM $hash->{FD} = $hash->{IODev}{IODev}{FD}; # Lets fool the TCM
$hash->{IODev}{TCMHash} = $hash; $hash->{IODev}{TCMHash} = $hash;
$hash->{IOReadFn} = "STACKABLE_IOReadFn"; $hash->{IOReadFn} = "STACKABLE_CC_IOReadFn";
return 1; return 1;
} }
sub sub
STACKABLE_IOReadFn($) STACKABLE_CC_IOReadFn($)
{ {
my ($hash) = @_; my ($hash) = @_;
my $me = $hash->{IODev}; my $me = $hash->{IODev};
@ -195,7 +195,7 @@ STACKABLE_IOReadFn($)
} }
sub sub
STACKABLE_IOWriteFn($$) STACKABLE_CC_IOWriteFn($$)
{ {
my ($hash, $msg) = @_; my ($hash, $msg) = @_;
return IOWrite($hash, "", unpack("H*",$msg)); return IOWrite($hash, "", unpack("H*",$msg));