From 936b36aaf2d7a7affb627c67a7b97879f972a439 Mon Sep 17 00:00:00 2001 From: rudolfkoenig <> Date: Sun, 9 Jun 2013 14:23:39 +0000 Subject: [PATCH] Fixing bug on logfile-switch git-svn-id: https://svn.fhem.de/fhem/trunk@3266 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/92_FileLog.pm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/fhem/FHEM/92_FileLog.pm b/fhem/FHEM/92_FileLog.pm index 8f222d404..e73a40ea1 100755 --- a/fhem/FHEM/92_FileLog.pm +++ b/fhem/FHEM/92_FileLog.pm @@ -117,8 +117,7 @@ FileLog_Log($$) my $max = int(@{$dev->{CHANGED}}); my $tn = $dev->{NTFY_TRIGGERTIME}; my $ct = $dev->{CHANGETIME}; - my $wrotesome; - my $fh = $log->{FH}; + my $fh; my $switched; for (my $i = 0; $i < $max; $i++) { @@ -132,12 +131,11 @@ FileLog_Log($$) FileLog_Switch($log); $switched = 1; } - + $fh = $log->{FH}; print $fh "$t $n $s\n"; - $wrotesome = 1; } } - if($wrotesome) { + if($fh) { $fh->flush; # Skip sync, it costs too much HD strain, esp. on SSD # $fh->sync if !($^O eq 'MSWin32'); #not implemented in Windows