mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fhem.pl: avoid some "undefined" messages (Forum #39887)

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@9090 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2015-08-18 05:53:22 +00:00
parent 1883723f85
commit b4d8535cc9
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
fhem/fhem.pl
View File

@@ -635,6 +635,7 @@ while (1) {
# reported by select, but is used by unix too, to check if the device is # reported by select, but is used by unix too, to check if the device is
# attached again. # attached again.
foreach my $p (keys %selectlist) { foreach my $p (keys %selectlist) {
next if(!$p); # Deleted in the loop
my $hash = $selectlist{$p}; my $hash = $selectlist{$p};
my $isDev = ($hash && $hash->{NAME} && $defs{$hash->{NAME}}); my $isDev = ($hash && $hash->{NAME} && $defs{$hash->{NAME}});
my $isDirect = ($hash && ($hash->{directReadFn} || $hash->{directWriteFn})); my $isDirect = ($hash && ($hash->{directReadFn} || $hash->{directWriteFn}));
@@ -2661,6 +2662,7 @@ HandleTimeout()
# Check the internal list. # Check the internal list.
foreach my $i (sort { $intAt{$a}{TRIGGERTIME} <=> foreach my $i (sort { $intAt{$a}{TRIGGERTIME} <=>
$intAt{$b}{TRIGGERTIME} } keys %intAt) { $intAt{$b}{TRIGGERTIME} } keys %intAt) {
next if(!$i || !$intAt{$i}); # deleted in the loop
my $tim = $intAt{$i}{TRIGGERTIME}; my $tim = $intAt{$i}{TRIGGERTIME};
my $fn = $intAt{$i}{FN}; my $fn = $intAt{$i}{FN};
if(!defined($tim) || !defined($fn)) { if(!defined($tim) || !defined($fn)) {