From 25d58d1002f996314c19c4a8f0d04c9b5c686e0a Mon Sep 17 00:00:00 2001 From: martinp876 <> Date: Tue, 10 Jul 2018 17:49:45 +0000 Subject: [PATCH] HMInfo:minor Bug git-svn-id: https://svn.fhem.de/fhem/trunk@16971 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/98_HMinfo.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/98_HMinfo.pm b/fhem/FHEM/98_HMinfo.pm index 7f8a8abd6..41409cc15 100644 --- a/fhem/FHEM/98_HMinfo.pm +++ b/fhem/FHEM/98_HMinfo.pm @@ -1181,18 +1181,16 @@ sub HMinfo_GetFn($@) {######################################################### my $c = 0; foreach (@pl){ $_ =~ s/\s+$|//g ; - $_ =~ s/CMDs_//; - + $_ =~ s/CMDs[_ ]//; if ($type ne "long"){ $_ =~ s/:*..-.. ..:..:..//g;# if ($type eq "short"); - $plSum[$c] +=$_; + $plSum[$c] += $1 if ($_ =~ m/^\s*(\d+)/); } elsif($_ =~m /^[ ,0-9]{1,5}:/){ my ($cnt,$date) = split(":",$_,2); $_ = sprintf("%-5s-%s",$cnt,$date); $plSum[$c] +=$cnt; } - $_ =~ s/CMDs // if ($type ne "long"); $c++; }