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

Attribut Twilight nach TYPEN suche setzen

Browse Source
This commit is contained in:
Marko Oldenburg
2018-11-09 08:11:16 +01:00
parent 16e6b946b5
commit 88753371dd
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
73_AutoShuttersControl.pm
View File

@ -38,7 +38,7 @@ package main;
use strict; use strict;
use warnings; use warnings;
my $version = "0.1.93"; my $version = "0.1.93.2";
sub AutoShuttersControl_Initialize($) { sub AutoShuttersControl_Initialize($) {
my ($hash) = @_; my ($hash) = @_;
@ -80,6 +80,7 @@ sub AutoShuttersControl_Initialize($) {
. "ASC_timeUpHolidayDevice " . "ASC_timeUpHolidayDevice "
. "ASC_timeUpHolidayReading " . "ASC_timeUpHolidayReading "
. "ASC_shuttersDriveOffset " . "ASC_shuttersDriveOffset "
. "ASC_twilightDevice "
. $readingFnAttributes; . $readingFnAttributes;
$hash->{NotifyOrderPrefix} = "51-"; # Order Nummer für NotifyFn $hash->{NotifyOrderPrefix} = "51-"; # Order Nummer für NotifyFn
@ -92,7 +93,8 @@ sub AutoShuttersControl_Initialize($) {
## unserer packagename ## unserer packagename
package AutoShuttersControl; package AutoShuttersControl;
no warnings "experimental::declared_refs";
use feature "declared_refs";
use strict; use strict;
use warnings; use warnings;
use POSIX; use POSIX;
@ -364,6 +366,7 @@ sub Notify($$) {
CommandDeleteReading( undef, $name . ' selfDefence' ) CommandDeleteReading( undef, $name . ' selfDefence' )
if ( ReadingsVal( $name, 'selfDefence', 'none' ) ne 'none' ) if ( ReadingsVal( $name, 'selfDefence', 'none' ) ne 'none' )
; # temporär kann später entfernt werden. ; # temporär kann später entfernt werden.
CommandAttr( undef, $name . ' ASC_twilightDevice ' . ( devspec2array('TYPE=(Astro|Twilight)'))[0] ) if ( AttrVal($name,'ASC_twilightDevice','none') eq 'none' );
# Ist der Event ein globaler und passt zum Rest der Abfrage oben wird nach neuen Rolläden Devices gescannt und eine Liste im Rolladenmodul sortiert nach Raum generiert # Ist der Event ein globaler und passt zum Rest der Abfrage oben wird nach neuen Rolläden Devices gescannt und eine Liste im Rolladenmodul sortiert nach Raum generiert
ShuttersDeviceScan($hash) ShuttersDeviceScan($hash)