70_PIONEERAVR: bugfix "R" were not deleted in INTERNAL PARTIAL

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@8960 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
hofrichter
2015-07-13 21:21:45 +00:00
parent 9f2101807f
commit 20e0715985

View File

@@ -2260,7 +2260,12 @@ sub PIONEERAVR_checkConnection ($) {
# we got a reply -> connection is good -> restore state
Log3 $name, 5, "PIONEERAVR $name: PIONEERAVR_checkConnection() --- state: ".$hash->{STATE}." restored to: ".$state;
$hash->{STATE} = $state;
$hash->{PARTIAL} .= $connState;
Log3 $name, 5, "PIONEERAVR $name: PIONEERAVR_checkConnection() --- connstate: ".dq($connState)." PARTIAL: ".dq($hash->{PARTIAL});
if ($connState =~ m/^R\r?\n?$/) {
Log3 $name, 5, "PIONEERAVR $name: PIONEERAVR_checkConnection() --- connstate=R -> do nothing: ".dq($connState)." PARTIAL: ".dq($hash->{PARTIAL});
} else {
$hash->{PARTIAL} .= $connState;
}
}
if (AttrVal($name, "checkConnection", "enable") eq "enable" ) {
$hash->{helper}{nextConnectionCheck} = gettimeofday()+120;