FHEM/mod-GardenaSmart
1
0
Fork 0
Code Issues 2 Pull Requests Releases 3 Wiki Activity

fix part of code

Browse Source
This commit is contained in:
Marko Oldenburg 2017-10-02 16:05:10 +02:00
parent 28a2ce0ec4
commit fe7b1cada4
1 changed files with 7 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
73_GardenaSmartBridge.pm
View File

@ -68,7 +68,7 @@ eval "use JSON;1" or $missingModul .= "JSON ";
eval "use IO::Socket::SSL;1" or $missingModul .= "IO::Socket::SSL "; eval "use IO::Socket::SSL;1" or $missingModul .= "IO::Socket::SSL ";
my $version = "0.2.6"; my $version = "0.2.7";
@ -194,14 +194,13 @@ sub GardenaSmartBridge_Attr(@) {
if( $attrName eq "disable" ) { if( $attrName eq "disable" ) {
if( $cmd eq "set" and $attrVal eq "1" ) { if( $cmd eq "set" and $attrVal eq "1" ) {
RemoveInternalTimer($hash); RemoveInternalTimer($hash) if($init_done);
readingsSingleUpdate ( $hash, "state", "inactive", 1 ); readingsSingleUpdate ( $hash, "state", "inactive", 1 );
Log3 $name, 3, "GardenaSmartBridge ($name) - disabled"; Log3 $name, 3, "GardenaSmartBridge ($name) - disabled";
} }
elsif( $cmd eq "del" ) { elsif( $cmd eq "del" ) {
RemoveInternalTimer($hash); GardenaSmartBridge_InternalTimerGetDeviceData($hash) if($init_done);
GardenaSmartBridge_InternalTimerGetDeviceData($hash);
readingsSingleUpdate ( $hash, "state", "active", 1 ); readingsSingleUpdate ( $hash, "state", "active", 1 );
Log3 $name, 3, "GardenaSmartBridge ($name) - enabled"; Log3 $name, 3, "GardenaSmartBridge ($name) - enabled";
} }
@ -225,16 +224,14 @@ sub GardenaSmartBridge_Attr(@) {
return "Interval must be greater than 0" return "Interval must be greater than 0"
unless($attrVal > 0); unless($attrVal > 0);
$hash->{INTERVAL} = $attrVal; $hash->{INTERVAL} = $attrVal;
RemoveInternalTimer($hash);
Log3 $name, 3, "GardenaSmartBridge ($name) - set interval: $attrVal"; Log3 $name, 3, "GardenaSmartBridge ($name) - set interval: $attrVal";
GardenaSmartBridge_InternalTimerGetDeviceData($hash); GardenaSmartBridge_InternalTimerGetDeviceData($hash) if($init_done);
} }
elsif( $cmd eq "del" ) { elsif( $cmd eq "del" ) {
$hash->{INTERVAL} = 300; $hash->{INTERVAL} = 300;
RemoveInternalTimer($hash);
Log3 $name, 3, "GardenaSmartBridge ($name) - delete User interval and set default: 300"; Log3 $name, 3, "GardenaSmartBridge ($name) - delete User interval and set default: 300";
GardenaSmartBridge_InternalTimerGetDeviceData($hash); GardenaSmartBridge_InternalTimerGetDeviceData($hash) if($init_done);
} }
} }
@ -271,6 +268,8 @@ sub GardenaSmartBridge_InternalTimerGetDeviceData($) {
my $name = $hash->{NAME}; my $name = $hash->{NAME};
RemoveInternalTimer($hash);
if( not IsDisabled($name) ) { if( not IsDisabled($name) ) {
GardenaSmartBridge_getDevices($hash); GardenaSmartBridge_getDevices($hash);