From 755984fd1df1eacb03d9d1ae4953eccaafaa7ed1 Mon Sep 17 00:00:00 2001 From: Marko Oldenburg Date: Thu, 13 Jun 2019 15:06:30 +0200 Subject: [PATCH] code style --- 73_AutoShuttersControl.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/73_AutoShuttersControl.pm b/73_AutoShuttersControl.pm index c7599eb..bd4b731 100644 --- a/73_AutoShuttersControl.pm +++ b/73_AutoShuttersControl.pm @@ -48,7 +48,7 @@ use strict; use warnings; use FHEM::Meta; -my $version = '0.6.16.13'; +my $version = '0.6.17'; sub AutoShuttersControl_Initialize($) { my ($hash) = @_; @@ -328,6 +328,7 @@ sub Define($$) { if ( devspec2array('TYPE=AutoShuttersControl') > 1 ) ; # es wird geprüft ob bereits eine Instanz unseres Modules existiert,wenn ja wird abgebrochen return 'too few parameters: define ShuttersControl' if ( @a != 2 ); + # return # 'Cannot define ShuttersControl device. Perl modul ' # . ${missingModul} @@ -981,7 +982,8 @@ sub EventProcessingWindowRec($@) { #### Hardware Lock der Rollläden $shutters->setHardLockOut('off') - if ( $match =~ /[Cc]lose/ and $shutters->getShuttersPlace eq 'terrace' ); + if ( $match =~ /[Cc]lose/ + and $shutters->getShuttersPlace eq 'terrace' ); $shutters->setHardLockOut('on') if ( $match =~ /[Oo]pen/ and $shutters->getShuttersPlace eq 'terrace' );