From 6ad0baabe59ad9a3b5ca6ba866c2614f81eaf1a0 Mon Sep 17 00:00:00 2001
From: Marko Oldenburg <leongaultier@gmail.com>
Date: Tue, 14 Apr 2020 08:12:55 +0200
Subject: [PATCH] fix bug then ModeUp and ModeDown absent

---
 73_AutoShuttersControl.pm | 26 ++++++++++++++++++++++++--
 1 file changed, 24 insertions(+), 2 deletions(-)

diff --git a/73_AutoShuttersControl.pm b/73_AutoShuttersControl.pm
index 4a09057..f5bfdbd 100644
--- a/73_AutoShuttersControl.pm
+++ b/73_AutoShuttersControl.pm
@@ -1355,14 +1355,23 @@ sub EventProcessingRoommate {
             && (  !$shutters->getIsDay
                 || $shutters->getDown eq 'roommate'
                 || $shutters->getShadingMode eq 'absent'
-                || $shutters->getUp eq 'absent' )
+                || $shutters->getModeUp eq 'absent'
+                || $shutters->getModeDown eq 'absent' )
           )
         {
+            Log3( $name, 4,
+"AutoShuttersControl ($name) - EventProcessingRoommate absent: $shuttersDev"
+            );
+
             if (   ( $shutters->getIsDay || $shutters->getUp eq 'roommate' )
                 && $shutters->getIfInShading
                 && !$shutters->getQueryShuttersPos( $shutters->getShadingPos )
                 && $shutters->getShadingMode eq 'absent' )
             {
+                Log3( $name, 4,
+"AutoShuttersControl ($name) - EventProcessingRoommate Shading: $shuttersDev"
+                );
+
                 $shutters->setLastDrive('shading in');
                 ShuttersCommandSet( $hash, $shuttersDev,
                     $shutters->getShadingPos );
@@ -1371,17 +1380,30 @@ sub EventProcessingRoommate {
                 && $getModeDown eq 'absent'
                 && $getRoommatesStatus eq 'absent' )
             {
+                Log3( $name, 4,
+"AutoShuttersControl ($name) - EventProcessingRoommate Down: $shuttersDev"
+                );
+
                 $shutters->setLastDrive('roommate absent');
                 ShuttersCommandSet( $hash, $shuttersDev,
                     $shutters->getClosedPos );
             }
             elsif ($shutters->getIsDay
-                && $shutters->getUp eq 'absent' )
+                && $shutters->getModeUp eq 'absent'
+                && $getRoommatesStatus eq 'absent' )
             {
+                Log3( $name, 4,
+"AutoShuttersControl ($name) - EventProcessingRoommate Up: $shuttersDev"
+                );
+
                 $shutters->setLastDrive('roommate absent');
                 ShuttersCommandSet( $hash, $shuttersDev,
                     $shutters->getOpenPos );
             }
+
+            Log3( $name, 4,
+"AutoShuttersControl ($name) - EventProcessingRoommate NICHTS: $shuttersDev"
+            );
         }
     }