change version, code style

This commit is contained in:
Marko Oldenburg 2019-05-07 11:34:53 +02:00
parent 6f8175ca88
commit 50f5bd9477

View File

@ -44,7 +44,7 @@ use strict;
use warnings;
use FHEM::Meta;
my $version = '0.6.7.1-patchBrightness';
my $version = '0.6.7';
sub AutoShuttersControl_Initialize($) {
my ($hash) = @_;
@ -2050,7 +2050,8 @@ sub EventProcessingShutters($@) {
ASC_Debug( 'EventProcessingShutters: '
. $shutters->getShuttersDev
. ' - Event vom Rolllo erkannt. Es wird nun eine etwaige manuelle Fahrt ausgewertet.'
. ' Int von gettimeofday: ' . int( gettimeofday() )
. ' Int von gettimeofday: '
. int( gettimeofday() )
. ' Last Position Timestamp: '
. $shutters->getLastPosTimestamp
. ' Drive Up Max Duration: '
@ -2058,16 +2059,12 @@ sub EventProcessingShutters($@) {
. ' Last Position: '
. $shutters->getLastPos
. ' aktuelle Position: '
. $shutters->getStatus
);
. $shutters->getStatus );
if ( ( int( gettimeofday() ) - $shutters->getLastPosTimestamp ) >
$shutters->getDriveUpMaxDuration
and ( int( gettimeofday() ) - $shutters->getLastManPosTimestamp ) >
$shutters->getDriveUpMaxDuration
)
$shutters->getDriveUpMaxDuration )
{
$shutters->setLastDrive('manual');
$shutters->setLastDriveReading;
@ -2730,9 +2727,11 @@ sub IsDay($) {
##### Nach Sonnenuntergang / Abends
$respIsDay = (
(
( $shutters->getBrightness > $brightnessMinVal
(
$shutters->getBrightness > $brightnessMinVal
and $isday
and not $shutters->getSunset )
and not $shutters->getSunset
)
or not $shutters->getSunset
) ? 1 : 0
) if ( $shutters->getDown eq 'brightness' );
@ -2751,9 +2750,11 @@ sub IsDay($) {
##### Nach Sonnenauf / Morgens
$respIsDay = (
(
( $shutters->getBrightness > $brightnessMaxVal
(
$shutters->getBrightness > $brightnessMaxVal
and not $isday
and not $shutters->getSunrise )
and not $shutters->getSunrise
)
or $respIsDay
or $shutters->getSunrise
) ? 1 : 0