2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-23 20:52:13 +00:00

improve templit errormessages

git-svn-id: https://svn.fhem.de/fhem/trunk@6037 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2014-06-03 07:28:46 +00:00
parent ada0441c98
commit 4f07025f49
2 changed files with 3 additions and 3 deletions

View File

@ -6857,8 +6857,8 @@ sub CUL_HM_tempListTmpl(@) { ##################################################
foreach my $p (keys %dlf){
my @unprg = grep !/^$/,map {$dlf{$p}{$_}?"":$_} keys %{$dlf{$p}};
my $cnt = scalar @unprg;
if ($cnt > 0 && $cnt < 7) {$ret .= "\n incomplete template for prog $p days:".join(",",@unprg);}
elsif ($cnt == 7) {$ret .= "\n unprogrammed prog $p ";}
if ($cnt > 0 && $cnt < 7) {$ret .= "\n $name: incomplete template for prog $p days:".join(",",@unprg);}
elsif ($cnt == 7) {$ret .= "\n $name: unprogrammed prog $p ";}
}
}
foreach (@exec){

View File

@ -818,7 +818,7 @@ sub HMinfo_GetFn($@) {#########################################################
devspec2array("model=HM.*-TC.*:FILTER=chanNo=02:FILTER=tempListTmpl=.*"));
my @tlr;
foreach my $e (@td){
my $tr = CUL_HM_tempListTmpl($e,"verify",AttrVal($e,"tempListTmpl","tempList.cfg:$e"));
my $tr = CUL_HM_tempListTmpl($e,"verify",AttrVal($e,"tempListTmpl",AttrVal($hash->{NAME},"configDir",".")."/tempList.cfg:$e"));
push @tlr,$tr if($tr);
}
$ret .= "\n\n templist mismatch \n ".join("\n ",@tlr) if (@tlr);