diff --git a/73_AutoShuttersControl.pm b/73_AutoShuttersControl.pm index 38eb526..722d6e6 100644 --- a/73_AutoShuttersControl.pm +++ b/73_AutoShuttersControl.pm @@ -2518,11 +2518,23 @@ sub ShadingProcessing { ); readingsBeginUpdate($shuttersDevHash); - readingsBulkUpdateIfChanged( + readingsBulkUpdate( $shuttersDevHash, 'ASC_ShadingMessage', 'INFO: current shading status is \'' - . $shutters->getShadingStatus . '\'', + . $shutters->getShadingStatus . '\'' + . ' - next check in ' + . ( + ( + ( + $shutters->getShadingLastStatus eq 'out reserved' + || $shutters->getShadingLastStatus eq 'out' + ) + ? $shutters->getShadingWaitingPeriod + : $shutters->getShadingWaitingPeriod / 2 + ) + ) / 60 + . 'm' ); readingsEndUpdate( $shuttersDevHash, 1 ); @@ -4800,7 +4812,7 @@ sub _CheckShuttersConditionsForShadingFn { $infoMessage .= ( $shutters->getShadingMode eq 'off' && $ascDev->getAutoShuttersControlShading eq 'on' - ? ' global shading active but ASC_Shading_Mode attribut is not set' + ? ' global shading active but ASC_Shading_Mode attribut is not set or off' : '' ); @@ -8599,6 +8611,9 @@ sub getBlockAscDrivesAfterManual {