diff --git a/FHEM/00_KM271.pm b/FHEM/00_KM271.pm index 25e10ba6b..f58146eb8 100755 --- a/FHEM/00_KM271.pm +++ b/FHEM/00_KM271.pm @@ -302,7 +302,7 @@ KM271_Read($) return; } - if($buf eq "10") { + if($buf eq "10") { if($hash->{DATASENT}) { delete($hash->{DATASENT}); KM271_SimpleWrite($hash, "02") if(@{$hash->{SENDBUFFER}}); diff --git a/FHEM/10_CUL_HM.pm b/FHEM/10_CUL_HM.pm index 5c2010808..dd6f740f4 100755 --- a/FHEM/10_CUL_HM.pm +++ b/FHEM/10_CUL_HM.pm @@ -244,7 +244,6 @@ CUL_HM_Parse($$) if($cmd eq "8002") { # Ack if($shash->{cmdStack}) { # Send next msg from the stack -Log 1, "PopCmd:" . $shash->{cmdStack}->[0]; CUL_HM_SendCmd($shash, shift @{$shash->{cmdStack}}, 1, 1); delete($shash->{cmdStack}) if(!@{$shash->{cmdStack}}); $shash->{lastStackAck} = 1; @@ -846,7 +845,7 @@ CUL_HM_PushCmdStack($$) my ($hash, $cmd) = @_; my @arr = (); $hash->{cmdStack} = \@arr if(!$hash->{cmdStack}); - Log 1, "PushStack: $cmd"; + #Log 1, "PushStack: $cmd"; push(@{$hash->{cmdStack}}, $cmd); } diff --git a/FHEM/92_FileLog.pm b/FHEM/92_FileLog.pm index 4ef2ebaab..07724db03 100755 --- a/FHEM/92_FileLog.pm +++ b/FHEM/92_FileLog.pm @@ -250,7 +250,6 @@ FileLog_Get($@) my $col = $h->{col}; my $t = $h->{type}; - my $val = undef; my $dte = $fld[0]; @@ -290,6 +289,7 @@ FileLog_Get($@) $val = $1 if($fld[$col] =~ m/^(\d+).*/o); } else { # evaluate + $val = eval($h->{fn}); }