From 494529bf2599658f56450382576c2b44ebdfc998 Mon Sep 17 00:00:00 2001 From: LeonGaultier Date: Sun, 15 Apr 2018 17:47:59 +0000 Subject: [PATCH] 73_GardenaSmartBridge: add error trigger for notify sub git-svn-id: https://svn.fhem.de/fhem/trunk@16621 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/CHANGED | 1 + fhem/FHEM/73_GardenaSmartBridge.pm | 8 +++++--- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/fhem/CHANGED b/fhem/CHANGED index d72558d3e..7b03c652a 100644 --- a/fhem/CHANGED +++ b/fhem/CHANGED @@ -1,5 +1,6 @@ # Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Do not insert empty lines here, update check depends on it. + - bugfix: 73_GardenaSmartBridge: add error trigger for notify sub - feature: 98_SVG.pm: horizontalLine* added (Forum #86800) - change: 93_DbLog: verbose level in addlog changed if reading not found - feature: 59_WUup: added AqPM2.5, AqPM10; fixed documentation diff --git a/fhem/FHEM/73_GardenaSmartBridge.pm b/fhem/FHEM/73_GardenaSmartBridge.pm index c43c54886..33225bea1 100644 --- a/fhem/FHEM/73_GardenaSmartBridge.pm +++ b/fhem/FHEM/73_GardenaSmartBridge.pm @@ -68,7 +68,7 @@ eval "use JSON;1" or $missingModul .= "JSON "; eval "use IO::Socket::SSL;1" or $missingModul .= "IO::Socket::SSL "; -my $version = "1.0.0"; +my $version = "1.0.1"; @@ -262,7 +262,8 @@ sub GardenaSmartBridge_Notify($$) { ) and $init_done ); - if( $devtype eq 'GardenaSmartBridge' and grep /^state:.connected.to.cloud$/,@{$events} ) { + if( $devtype eq 'GardenaSmartBridge' and (grep /^state:.connected.to.cloud$/,@{$events} + or grep /^lastRequestState:.request_error$/,@{$events}) ) { InternalTimer( gettimeofday()+$hash->{INTERVAL},"GardenaSmartBridge_getDevices", $hash); Log3 $name, 4, "GardenaSmartBridge ($name) - set internal timer function for recall GardenaSmartBridge_getDevices sub"; @@ -330,7 +331,8 @@ sub GardenaSmartBridge_Write($@) { } ); - Log3 $name, 4, "GardenaSmartBridge ($name) - Send with URL: $hash->{URL}$uri, HEADER: $header, DATA: $payload, METHOD: $method"; + #Log3 $name, 4, "GardenaSmartBridge ($name) - Send with URL: $hash->{URL}$uri, HEADER: $header, DATA: $payload, METHOD: $method"; + Log3 $name, 4, "GardenaSmartBridge ($name) - Send with URL: $hash->{URL}$uri, HEADER: secret!, DATA: secret!, METHOD: $method"; } sub GardenaSmartBridge_ErrorHandling($$$) {