fhem.pl: more flexible RemoveInternalTimer (Forum #81365)

--  This line, and those below, will be ignored--

M    fhem.pl


git-svn-id: https://svn.fhem.de/fhem/trunk@15667 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2017-12-22 09:33:24 +00:00
parent 1bb5542701
commit bc512a17d9

View File

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