From ee0d9997f378df778c9af5633c2b65d266578c85 Mon Sep 17 00:00:00 2001 From: martinp876 <> Date: Sat, 3 Sep 2016 05:30:13 +0000 Subject: [PATCH] CUL_HM: temlistG correction git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@12111 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/10_CUL_HM.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FHEM/10_CUL_HM.pm b/FHEM/10_CUL_HM.pm index 927271c88..99c419613 100755 --- a/FHEM/10_CUL_HM.pm +++ b/FHEM/10_CUL_HM.pm @@ -9083,9 +9083,9 @@ sub CUL_HM_tempListTmpl(@) { ################################################## @exec = (); foreach my $eN(@el){ if ($action eq "verify"){ - $val = join(" ",split(" ",$val)); + $val = join(" ",map{(my $foo = $_) =~ s/^(.\.)/0$1/;$foo} split(" ",$val)); my $nv = ReadingsVal($eN,$tln,"empty"); - $nv = join(" ",split(" ",$nv)); + $nv = join(" ",map{(my $foo = $_) =~ s/^(.\.)/0$1/;$foo} split(" ",$nv)); push @entryFail,$eN." :".$tln." mismatch $val ne $nv ##" if ($val ne $nv); } elsif($action eq "restore"){