2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00

fhem.pl: Fix warning in RemoveInternalTimer for empty arg like scheduled by structure or FHEMWEB

git-svn-id: https://svn.fhem.de/fhem/trunk@15876 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2018-01-13 18:12:32 +00:00
parent b2651513bf
commit f14a9b96e9

View File

@ -3119,8 +3119,9 @@ RemoveInternalTimer($;$)
my ($arg, $fn) = @_;
return if(!$arg && !$fn);
foreach my $a (keys %intAt) {
delete($intAt{$a}) if((!$arg || $intAt{$a}{ARG} eq $arg) &&
(!$fn || $intAt{$a}{FN} eq $fn));
my ($ia, $if) = ($intAt{$a}{ARG}, $intAt{$a}{ARG});
delete($intAt{$a}) if((!$arg || ($ia && $ia eq $arg)) &&
(!$fn || ($if && $if eq $fn)));
}
}