From 1c975f5bdcdccc6b0161de101bea7b64b5b9afbb Mon Sep 17 00:00:00 2001 From: Sebastian Date: Sat, 29 May 2021 22:18:05 +0200 Subject: [PATCH] test --- controls_HailoLibero.txt | 2 +- lib/FHEM/Hailo/Libero.pm | 13 ++++++------- 2 files changed, 7 insertions(+), 8 deletions(-) diff --git a/controls_HailoLibero.txt b/controls_HailoLibero.txt index 3cd0c07..b52c21a 100644 --- a/controls_HailoLibero.txt +++ b/controls_HailoLibero.txt @@ -1,2 +1,2 @@ UPD 2021-05-29_22:04:49 5190 FHEM/73_HailoLibero.pm -UPD 2021-05-29_22:10:49 11310 lib/FHEM/Hailo/Libero.pm +UPD 2021-05-29_22:17:56 11273 lib/FHEM/Hailo/Libero.pm diff --git a/lib/FHEM/Hailo/Libero.pm b/lib/FHEM/Hailo/Libero.pm index a3c46df..5a75ecd 100644 --- a/lib/FHEM/Hailo/Libero.pm +++ b/lib/FHEM/Hailo/Libero.pm @@ -236,7 +236,7 @@ sub Set { getSettings($hash); } # open door - write($hash,undef) + write($hash,'open') if (lc $cmd eq 'open'); } @@ -284,10 +284,10 @@ sub setSettings { sub getSettings { my $hash = shift; my $name = $hash->{NAME}; - + Write( $hash, undef, undef, undef ); - } + sub Write { my ( $hash, $payload ) = @_; my $name = $hash->{NAME}; @@ -366,14 +366,13 @@ sub createHttpValueStrings { if (ReadingsVal( $name, 'cookie', 'none' ) ne 'none'); my $uri = ''; my $method = 'POST'; - $payload = '{}' if ( !defined($payload) ); - + if ( ReadingsVal( $name, 'cookie', 'none' ) eq 'none' ){ $uri .= '/login'; readingsSingleUpdate( $hash, 'state', 'fetch cookie', 1 ); - } elsif ( defined($payload)){ + } elsif ( $payload ne 'open'){ $uri .= '/settings'; - } elsif ( $payload eq '{}'){ + } elsif ( $payload eq 'open'){ $uri .= '/open'; }else { $uri .= '/admin';