FHEM/mod-AutoShuttersControl
1
0
Fork 0
Code Issues 12 Pull Requests Releases 9 Wiki Activity

fix typo in Event RegEx for Twilight Event

Browse Source
This commit is contained in:
Marko Oldenburg 2019-02-27 21:30:35 +01:00
parent 2cf01e406c
commit 6b1cc2eb69
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
73_AutoShuttersControl.pm
View File

@ -41,7 +41,7 @@ package main;
use strict;
use warnings;
my $version = '0.4.0.8';
my $version = '0.4.0.9';
sub AutoShuttersControl_Initialize($) {
my ($hash) = @_;
@ -1303,14 +1303,14 @@ sub EventProcessingTwilightDevice($@) {
#
# Astro
# SunAz = azimuth = Sonnenwinkel
# SunAlt = evaluation = Sonnenhöhe
# SunAlt = elevation = Sonnenhöhe
if ( $events =~ m#(azimuth|evaluation|SunAz|SunAlt):\s(\d+.\d+)# ) {
if ( $events =~ m#(azimuth|elevation|SunAz|SunAlt):\s(\d+.\d+)# ) {
my $name = $device;
my ( $azimuth, $elevation );
$azimuth = $2 if ( $1 eq 'azimuth' or $1 eq 'SunAz' );
$elevation = $2 if ( $1 eq 'evaluation' or $1 eq 'SunAlt' );
$elevation = $2 if ( $1 eq 'elevation' or $1 eq 'SunAlt' );
$azimuth = $ascDev->getAzimuth
if ( not defined($azimuth) and not $azimuth );