From 9e48d335ee8daf5115461821df7f76e7c954093b Mon Sep 17 00:00:00 2001
From: Sebastian <gitlab@sebastianschwarz.eu>
Date: Mon, 17 May 2021 20:21:28 +0200
Subject: [PATCH] fix up

---
 controls_HailiLibero.txt |  2 +-
 lib/FHEM/Hailo/Libero.pm | 10 +++-------
 2 files changed, 4 insertions(+), 8 deletions(-)

diff --git a/controls_HailiLibero.txt b/controls_HailiLibero.txt
index 9d3295d..b7df995 100644
--- a/controls_HailiLibero.txt
+++ b/controls_HailiLibero.txt
@@ -1,2 +1,2 @@
 UPD 2021-05-17_20:04:35 4327 FHEM/73_HailoLibero.pm
-UPD 2021-05-17_20:04:33 6455 lib/FHEM/Hailo/Libero.pm
+UPD 2021-05-17_20:13:25 6449 lib/FHEM/Hailo/Libero.pm
diff --git a/lib/FHEM/Hailo/Libero.pm b/lib/FHEM/Hailo/Libero.pm
index 9af31b4..86cfe3a 100644
--- a/lib/FHEM/Hailo/Libero.pm
+++ b/lib/FHEM/Hailo/Libero.pm
@@ -83,7 +83,7 @@ sub Define {
     my $name = shift @$aArg;
     $hash->{VERSION}    = version->parse($VERSION)->normal;
    
-    CommandAttr( undef, $name . ' room Haeilo' )
+    CommandAttr( undef, $name . ' room Hailo' )
       if ( AttrVal( $name, 'room', 'none' ) eq 'none' );
 
     readingsSingleUpdate( $hash, 'state', 'initialized', 1 );
@@ -149,7 +149,7 @@ sub Set {
     }    
     else {
 
-        my $list = "hailopwd "
+        my $list = "hailopwd ";
         return "Unknown argument $cmd, choose one of $list";
     }
 
@@ -236,8 +236,6 @@ sub WriteReadings {
 ####################################
 #### my little helpers Sub's #######
 
-s
-
 sub Rename {
     my $new     = shift;
     my $old     = shift;
@@ -246,8 +244,6 @@ sub Rename {
     return;
 }
 
-
-
 sub createHttpValueStrings {
     my ( $hash, $payload ) = @_;
 
@@ -261,4 +257,4 @@ sub createHttpValueStrings {
     return ( $payload, $session_id, $header, $uri, $method );
 }
 
-1;
+1;
\ No newline at end of file