From 0fc3d1dfbab4a1bb1755d764de9eeb3c72e23eb1 Mon Sep 17 00:00:00 2001 From: Marko Oldenburg Date: Fri, 1 May 2020 20:17:16 +0200 Subject: [PATCH] Debugging only --- 73_GardenaSmartBridge.pm | 1 - 74_GardenaSmartDevice.pm | 5 ++++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/73_GardenaSmartBridge.pm b/73_GardenaSmartBridge.pm index cb34011..5e83d79 100644 --- a/73_GardenaSmartBridge.pm +++ b/73_GardenaSmartBridge.pm @@ -62,7 +62,6 @@ use strict; use warnings; use POSIX; use FHEM::Meta; -use Data::Dumper; use HttpUtils; diff --git a/74_GardenaSmartDevice.pm b/74_GardenaSmartDevice.pm index 2d4eaf2..3323e29 100644 --- a/74_GardenaSmartDevice.pm +++ b/74_GardenaSmartDevice.pm @@ -63,6 +63,8 @@ use POSIX; use FHEM::Meta; use Time::Local; +use Data::Dumper; # only for debugging + # try to use JSON::MaybeXS wrapper # for chance of better performance + open code eval { @@ -296,7 +298,8 @@ sub Set { elsif ( lc $cmd eq 'startpoint' ) { my $err; - ( $err, $payload, $abilities ) = SetPredefinedStartPoints( $hash, @$aArg ); + print Dumper $aArg; +# ( $err, $payload, $abilities ) = SetPredefinedStartPoints( $hash, @$aArg ); return $err if ( defined($err) ); }