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) ); }