change canceloverride

This commit is contained in:
Marko Oldenburg 2020-04-26 11:31:42 +02:00
parent 662df04c2a
commit f0be523583

View File

@ -340,14 +340,19 @@ sub Set($@) {
elsif ( lc $cmd eq 'manualoverride' ) { elsif ( lc $cmd eq 'manualoverride' ) {
my $duration = join( " ", @args ); my $duration = join( " ", @args );
$payload = '"name":"manual_override","parameters":{"duration":' $payload =
. $duration . '}'; '"properties":{"name":"watering_timer_1'
. '","value":{"state":"manual","duration":'
. $duration * 60
. ',"valve_id":1}}';
} }
elsif ( lc $cmd eq 'canceloverride' ) { elsif ( lc $cmd eq 'canceloverride' ) {
$payload = '"name":"cancel_override"'; $payload =
'"properties":{"name":"watering_timer_1'
. '","value":{"state":"idle","duration":'
. 0
. ',"valve_id":1}}';
} }
elsif ( lc $cmd eq 'on' or lc $cmd eq 'off' or lc $cmd eq 'on-for-timer' ) { elsif ( lc $cmd eq 'on' or lc $cmd eq 'off' or lc $cmd eq 'on-for-timer' ) {