more condition for shading manual

2019-06-30 09:18:50 +02:00
parent 1f98f2ceb4
commit 94770e7939
1 changed files with 4 additions and 2 deletions
--- a/73_AutoShuttersControl.pm
+++ b/73_AutoShuttersControl.pm
@@ -2069,7 +2069,8 @@ sub ShadingProcessing($@) {
          )
        {
            $shutters->setShadingStatus('out');
-            $shutters->setShadingLastStatus('in');
+            $shutters->setShadingLastStatus('in')
+              if ( $shutters->getShadingLastStatus eq 'out';
        }

        Log3( $name, 4,
@@ -2104,7 +2105,8 @@ sub ShadingProcessing($@) {
            ( $shutters->getShadingWaitingPeriod / 2 ) )
        {
            $shutters->setShadingStatus('in');
-            $shutters->setShadingLastStatus('out');
+            $shutters->setShadingLastStatus('out')
+              if ( $shutters->getShadingLastStatus eq 'in';
        }

        Log3( $name, 4,