fix set command in Set Fn and bug in WindowRec shading mode absent fixes: 8

This commit is contained in:
Marko Oldenburg 2020-04-05 19:20:20 +02:00
parent b1025d746d
commit 95349ce3db

View File

@ -663,7 +663,7 @@ sub Set {
RenewSunRiseSetShuttersTimer($hash); RenewSunRiseSetShuttersTimer($hash);
} }
elsif ( lc $cmd eq 'renewtimer' ) { elsif ( lc $cmd eq 'renewtimer' ) {
return "usage: $cmd" if ( scalar( @{$a} ) > 0 ); return "usage: $cmd" if ( scalar( @{$a} ) > 1 );
CreateSunRiseSetShuttersTimer( $hash, $a->[0] ); CreateSunRiseSetShuttersTimer( $hash, $a->[0] );
} }
elsif ( lc $cmd eq 'scanforshutters' ) { elsif ( lc $cmd eq 'scanforshutters' ) {
@ -1110,7 +1110,8 @@ sub EventProcessingWindowRec {
) )
{ {
if ( $shutters->getIfInShading if ( $shutters->getIfInShading
&& $shutters->getShadingPos != $shutters->getStatus ) && $shutters->getShadingPos != $shutters->getStatus
&& $shutters->getShadingMode ne 'absent' )
{ {
$shutters->setLastDrive('shading in'); $shutters->setLastDrive('shading in');
$shutters->setNoDelay(1); $shutters->setNoDelay(1);
@ -8434,7 +8435,7 @@ sub getBlockAscDrivesAfterManual {
], ],
"release_status": "testing", "release_status": "testing",
"license": "GPL_2", "license": "GPL_2",
"version": "v0.8.24", "version": "v0.8.25",
"author": [ "author": [
"Marko Oldenburg <leongaultier@gmail.com>" "Marko Oldenburg <leongaultier@gmail.com>"
], ],