fix selfdefense bug then residents switch to home
This commit is contained in:
parent
60ae53a9cf
commit
11782224c9
@ -1809,6 +1809,12 @@ sub EventProcessingBrightness($@) {
|
|||||||
and $shutters->getUp eq 'brightness'
|
and $shutters->getUp eq 'brightness'
|
||||||
and not $shutters->getSunrise
|
and not $shutters->getSunrise
|
||||||
and $ascDev->getAutoShuttersControlMorning eq 'on'
|
and $ascDev->getAutoShuttersControlMorning eq 'on'
|
||||||
|
and (
|
||||||
|
$ascDev->getSelfDefense eq 'off'
|
||||||
|
or $shutters->getSelfDefenseMode eq 'off'
|
||||||
|
or ( $ascDev->getSelfDefense eq 'on'
|
||||||
|
and $ascDev->getResidentsStatus ne 'gone' )
|
||||||
|
)
|
||||||
)
|
)
|
||||||
{
|
{
|
||||||
Log3( $name, 4,
|
Log3( $name, 4,
|
||||||
@ -1992,7 +1998,7 @@ sub EventProcessingBrightness($@) {
|
|||||||
$shutters->setSunrise(0);
|
$shutters->setSunrise(0);
|
||||||
$shutters->setSunset(1)
|
$shutters->setSunset(1)
|
||||||
unless ( $shutters->getPrivacyDownStatus == 2
|
unless ( $shutters->getPrivacyDownStatus == 2
|
||||||
or $posValue == $shutters->getStatus );
|
and $posValue == $shutters->getStatus );
|
||||||
$shutters->setPrivacyDownStatus(0)
|
$shutters->setPrivacyDownStatus(0)
|
||||||
if ( $shutters->getPrivacyDownStatus == 2 );
|
if ( $shutters->getPrivacyDownStatus == 2 );
|
||||||
ShuttersCommandSet( $hash, $shuttersDev, $posValue );
|
ShuttersCommandSet( $hash, $shuttersDev, $posValue );
|
||||||
@ -7776,7 +7782,7 @@ sub getblockAscDrivesAfterManual {
|
|||||||
],
|
],
|
||||||
"release_status": "under develop",
|
"release_status": "under develop",
|
||||||
"license": "GPL_2",
|
"license": "GPL_2",
|
||||||
"version": "v0.8.4",
|
"version": "v0.8.5",
|
||||||
"author": [
|
"author": [
|
||||||
"Marko Oldenburg <leongaultier@gmail.com>"
|
"Marko Oldenburg <leongaultier@gmail.com>"
|
||||||
],
|
],
|
||||||
|
Loading…
Reference in New Issue
Block a user