diff --git a/fhem/FHEM/00_HMLAN.pm b/fhem/FHEM/00_HMLAN.pm
index 3119af5a7..586bcc005 100755
--- a/fhem/FHEM/00_HMLAN.pm
+++ b/fhem/FHEM/00_HMLAN.pm
@@ -119,10 +119,10 @@ sub HMLAN_Define($$) {#########################################################
$defs{$name}{helper}{log}{all} = 0;# selective log support
$defs{$name}{helper}{log}{sys} = 0;
my @al = ();
- @{$defs{$name}{helper}{log}{ids}} = \@al;
-
- $defs{$name}{helper}{assId} = 0;#define hash
+ @{$hash->{helper}{log}{ids}} = \@al;
+ $hash->{assignedIDsCnt} = 0;#define hash
+ $hash->{assignedIDs} = "";
HMLAN_condUpdate($hash,253);#set disconnected
$hash->{STATE} = "disconnected";
@@ -1021,7 +1021,7 @@ sub HMLAN_getVerbLvl ($$$$){#get verboseLevel for message
hmId
hmKey
hmKey2
- hmKey3
+ hmKey3
hmKey4
hmKey5
AES keys for the HMLAN adapter.
diff --git a/fhem/FHEM/98_HMinfo.pm b/fhem/FHEM/98_HMinfo.pm
index 2cce87002..7d7d652f8 100644
--- a/fhem/FHEM/98_HMinfo.pm
+++ b/fhem/FHEM/98_HMinfo.pm
@@ -394,6 +394,7 @@ sub HMinfo_tempList(@) { ######################################################
}
}
}
+ close(aSave);
foreach (@exec){
my @param = split(" ",$_);
CUL_HM_Set($defs{$param[0]},@param);
@@ -1149,6 +1150,7 @@ sub HMinfo_loadConfig($@) {####################################################
}
}
}
+ close(aSave);
$ret .= "\nadded data:\n " .join("\n ",@el) if (scalar@el);
$ret .= "\nfile data incomplete:\n ".join("\n ",@elincmpl) if (scalar@elincmpl);
$ret .= "\nentries not defind:\n " .join("\n ",@entryNF) if (scalar@entryNF);