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

fhem.pl: add $hash->{CL} to CommandDelete (Forum #95875)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@18259 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2019-01-14 20:35:10 +00:00
parent 98388b79e7
commit f1caf321ec
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
fhem/fhem.pl
View File

@ -2179,16 +2179,20 @@ CommandDelete($$)
next; next;
} }
$defs{$sdev}->{CL} = $cl;
my $ret = CallFn($sdev, "UndefFn", $defs{$sdev}, $sdev); my $ret = CallFn($sdev, "UndefFn", $defs{$sdev}, $sdev);
if($ret) { if($ret) {
push @rets, $ret; push @rets, $ret;
delete $defs{$sdev}->{CL};
next; next;
} }
$ret = CallFn($sdev, "DeleteFn", $defs{$sdev}, $sdev); $ret = CallFn($sdev, "DeleteFn", $defs{$sdev}, $sdev);
if($ret) { if($ret) {
push @rets, $ret; push @rets, $ret;
delete $defs{$sdev}->{CL};
next; next;
} }
delete $defs{$sdev}->{CL};
# Delete releated hashes # Delete releated hashes