From e064c7f57f2ddc25ec6e4bc03da929cfe44fb380 Mon Sep 17 00:00:00 2001 From: Sebastian Date: Sat, 29 May 2021 23:28:34 +0200 Subject: [PATCH] pwd --- controls_HailoLibero.txt | 2 +- lib/FHEM/Hailo/Libero.pm | 4 +++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/controls_HailoLibero.txt b/controls_HailoLibero.txt index 2f7b0f7..6447d35 100644 --- a/controls_HailoLibero.txt +++ b/controls_HailoLibero.txt @@ -1,2 +1,2 @@ UPD 2021-05-29_23:25:02 5197 FHEM/73_HailoLibero.pm -UPD 2021-05-29_23:24:51 11567 lib/FHEM/Hailo/Libero.pm +UPD 2021-05-29_23:28:10 11675 lib/FHEM/Hailo/Libero.pm diff --git a/lib/FHEM/Hailo/Libero.pm b/lib/FHEM/Hailo/Libero.pm index 73fdfd0..16d2e0c 100644 --- a/lib/FHEM/Hailo/Libero.pm +++ b/lib/FHEM/Hailo/Libero.pm @@ -203,7 +203,9 @@ sub Set { my $cmd = shift @$aArg // return qq{"set $name" needs at least one argument}; if ( lc $cmd eq 'password' ) { - + return qq{error set libero ip first} + if ( AttrVal( $name, 'LiberoIP', 'none' ) eq 'none' ); + my ($passResp,$passErr); ($passResp,$passErr) = $hash->{helper}->{passObj}->setStorePassword($name,$aArg->[0]);