fhem.pl: InternalTimer loop fix (Forum #40598)

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@9195 2b470e98-0d58-463d-a4d8-8e2adae1ed80

fhem/fhem.pl

@@ -2670,7 +2670,8 @@ HandleTimeout()
   # Check the internal list.
   foreach my $i (sort { $intAt{$a}{TRIGGERTIME} <=>
                         $intAt{$b}{TRIGGERTIME} } keys %intAt) {
-    next if(!defined($i) || !$intAt{$i}); # deleted in the loop
+    $i = "" if(!defined($i)); # Forum #40598
+    next if(!$intAt{$i}); # deleted in the loop
     my $tim = $intAt{$i}{TRIGGERTIME};
     my $fn = $intAt{$i}{FN};
     if(!defined($tim) || !defined($fn)) {