mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-03-10 03:06:37 +00:00
fhem.pl: add $hash->{CL} to CommandDelete (Forum #95875)
git-svn-id: https://svn.fhem.de/fhem/trunk@18259 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
98388b79e7
commit
f1caf321ec
@ -2179,16 +2179,20 @@ CommandDelete($$)
|
||||
next;
|
||||
}
|
||||
|
||||
$defs{$sdev}->{CL} = $cl;
|
||||
my $ret = CallFn($sdev, "UndefFn", $defs{$sdev}, $sdev);
|
||||
if($ret) {
|
||||
push @rets, $ret;
|
||||
delete $defs{$sdev}->{CL};
|
||||
next;
|
||||
}
|
||||
$ret = CallFn($sdev, "DeleteFn", $defs{$sdev}, $sdev);
|
||||
if($ret) {
|
||||
push @rets, $ret;
|
||||
delete $defs{$sdev}->{CL};
|
||||
next;
|
||||
}
|
||||
delete $defs{$sdev}->{CL};
|
||||
|
||||
|
||||
# Delete releated hashes
|
||||
|
Loading…
x
Reference in New Issue
Block a user