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

MAX: fix perl warning

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@2309 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
mgehre
2012-12-09 15:20:43 +00:00
parent a0a8d87ad6
commit e243637e95
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
fhem/FHEM/00_MAXLAN.pm
View File

@@ -155,7 +155,7 @@ MAXLAN_Connect($)
#Parsing the "C:" responses later on will set IODev correctly again.
#This effectively removes IODev from all devices that are not longer paired to our Cube.
foreach (%{$modules{MAX}{defptr}}) {
$modules{MAX}{defptr}{$_}{IODev} = undef if($modules{MAX}{defptr}{$_}{IODev} == $hash);
$modules{MAX}{defptr}{$_}{IODev} = undef if(defined($modules{MAX}{defptr}{$_}{IODev}) and $modules{MAX}{defptr}{$_}{IODev} == $hash);
}
my $rmsg;