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:
@@ -2260,7 +2260,12 @@ sub PIONEERAVR_checkConnection ($) {
|
|||||||
# we got a reply -> connection is good -> restore state
|
# we got a reply -> connection is good -> restore state
|
||||||
Log3 $name, 5, "PIONEERAVR $name: PIONEERAVR_checkConnection() --- state: ".$hash->{STATE}." restored to: ".$state;
|
Log3 $name, 5, "PIONEERAVR $name: PIONEERAVR_checkConnection() --- state: ".$hash->{STATE}." restored to: ".$state;
|
||||||
$hash->{STATE} = $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" ) {
|
if (AttrVal($name, "checkConnection", "enable") eq "enable" ) {
|
||||||
$hash->{helper}{nextConnectionCheck} = gettimeofday()+120;
|
$hash->{helper}{nextConnectionCheck} = gettimeofday()+120;
|
||||||
|
|||||||
Reference in New Issue
Block a user