2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-01 01:09:47 +00:00

HMinfo: restore, better reply

git-svn-id: https://svn.fhem.de/fhem/trunk@10166 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2015-12-13 17:36:21 +00:00
parent f0f0273db9
commit 2fc0b02531
2 changed files with 13 additions and 4 deletions

View File

@ -8315,7 +8315,7 @@ sub CUL_HM_tempListTmpl(@) { ##################################################
$tln =~ s/R_(P._)?._//;
my $x = CUL_HM_Set($defs{$eN},$eN,$tln,"prep",split(" ",$val));
push @entryFail,$eN." :".$tln." respose:$x" if ($x ne "1");
push @exec,$eN." ".$tln." exec ".$val;
push @exec,"$eN $tln exec $val";
}
}
}

View File

@ -711,10 +711,19 @@ sub HMinfo_tempListTmpl(@) { ##################################################
$tmplDev = $fName.":$tmplDev" if ($tmplDev !~ m/:/);
my $r = CUL_HM_tempListTmpl($name,$action,$tmplDev);
push @rs, ($r ? "fail : $tmplDev for $name: $r"
: "passed: $tmplDev for $name")
."\n";
HMinfo_regCheck($name);#clean helper data (shadowReg) after restore
if($action eq "restore"){
push @rs, (keys %{$defs{$name}{helper}{shadowReg}}? "restore: $tmplDev for $name"
: "passed : $tmplDev for $name")
."\n";
}
else{
push @rs, ($r ? "fail : $tmplDev for $name: $r"
: "passed: $tmplDev for $name")
."\n";
}
}
$ret .= join "",sort @rs;
return $ret;
}