2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-08 01:14:19 +00:00

36_EleroDrive.pm: delete did not work

git-svn-id: https://svn.fhem.de/fhem/trunk@14131 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
HCS 2017-04-29 05:27:02 +00:00
parent a2b85ea406
commit 2a848a56d9

View File

@ -68,6 +68,8 @@ sub EleroDrive_Undef($$) {
RemoveInternalTimer($hash); RemoveInternalTimer($hash);
delete( $modules{EleroDrive}{defptr}{$channel} ); delete( $modules{EleroDrive}{defptr}{$channel} );
return undef;
} }
@ -132,7 +134,7 @@ sub EleroDrive_ToFixPosition($$) {
my $byteMsg = $head.$msgLength.$msgCmd.$firstChannels.$secondChannels.$payload.$checksum; my $byteMsg = $head.$msgLength.$msgCmd.$firstChannels.$secondChannels.$payload.$checksum;
###debugLog($name, "EleroDrive_Set->IOWrite: byteMsg=$byteMsg"); ###debugLog("EleroDrive_Set->IOWrite: byteMsg=$byteMsg");
IOWrite($hash, "send", $byteMsg); IOWrite($hash, "send", $byteMsg);
} }
@ -145,7 +147,7 @@ sub EleroDrive_ToAnyPosition($$) {
my ( $hash, $position) = @_; my ( $hash, $position) = @_;
my $name = $hash->{NAME}; my $name = $hash->{NAME};
###debugLog($name, "ToAnyPosition: $position"); ###debugLog("ToAnyPosition: $position");
} }
#======================================================================================= #=======================================================================================
@ -277,7 +279,7 @@ sub EleroDrive_Parse($$) {
my $rname = $rhash->{NAME}; my $rname = $rhash->{NAME};
if($modules{EleroDrive}{defptr}{$channel}) { if($modules{EleroDrive}{defptr}{$channel}) {
###debugLog($name, "$rname -> parsed $msg for channel $channel: $newstate"); ###debugLog("$rname -> parsed $msg for channel $channel: $newstate");
readingsBeginUpdate($rhash); readingsBeginUpdate($rhash);
readingsBulkUpdate($rhash, "state", $newstate); readingsBulkUpdate($rhash, "state", $newstate);
@ -292,7 +294,7 @@ sub EleroDrive_Parse($$) {
return @list; return @list;
} }
else { else {
###debugLog($name, "$name -> AUTOCREATE " . $hash->{IODev}->{NAME}); ###debugLog("$name -> AUTOCREATE " . $hash->{IODev}->{NAME});
return "UNDEFINED EleroDrive_$channel EleroDrive $channel"; return "UNDEFINED EleroDrive_$channel EleroDrive $channel";
} }
} }