2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

CUL_HM: bugfix at register interpretation

git-svn-id: https://svn.fhem.de/fhem/trunk@9168 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
martinp876 2015-08-30 13:45:07 +00:00
parent 8bed7f1eb1
commit 132d2b09ad

View File

@ -3351,7 +3351,7 @@ sub CUL_HM_Get($@) {#+++++++++++++++++ get command+++++++++++++++++++++++++++++
}
elsif($cmd =~ m /^(reg|regVal)$/) { ########################################
my (undef,undef,$regReq,$list,$peerId) = @a;
return if(!$regReq);
return if(!defined $regReq);
if ($regReq eq 'all'){
my @regArr = CUL_HM_getRegN($st,$md,($roleD?"00":""),($roleC?$chn:""));
@ -3395,7 +3395,7 @@ sub CUL_HM_Get($@) {#+++++++++++++++++ get command+++++++++++++++++++++++++++++
else{
my $regVal = CUL_HM_getRegFromStore($name,$regReq,$list,$peerId);
$regVal =~ s/ .*// if ($cmd eq "regVal");
return ($regVal =~ m /^invalid/)? "Value not captured"
return ($regVal =~ m /^invalid/)? "Value not captured:$name - $regReq"
: $regVal;
}
}
@ -6229,8 +6229,8 @@ sub CUL_HM_eventP($$) {#handle protocol events
my ($hash, $evntType) = @_;
return if (!defined $hash);
if ($evntType eq "Rcv"){
$nAttr->{"protLastRcv"} = TimeNow();
CUL_HM_UpdtReadSingle($hash,".protLastRcv",$nAttr->{"protLastRcv"},0);
$hash->{"protLastRcv"} = TimeNow();
CUL_HM_UpdtReadSingle($hash,".protLastRcv",$hash->{"protLastRcv"},0);
return;
}