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' ) {
my $duration = join( " ", @args );
$payload = '"name":"manual_override","parameters":{"duration":'
. $duration . '}';
$payload =
'"properties":{"name":"watering_timer_1'
. '","value":{"state":"manual","duration":'
. $duration * 60
. ',"valve_id":1}}';
}
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' ) {