bugfix watering_timer_valve_1

This commit is contained in:
Marko Oldenburg 2018-06-28 08:05:00 +02:00
parent 9a3a8cb04f
commit 71cb6affea

View File

@ -228,10 +228,10 @@ sub GardenaSmartDevice_Set($@) {
$payload = '"name":"cancel_override"';
### Watering ic24
} elsif( lc $cmd eq 'watering_timer_1' ) {
} elsif( lc $cmd eq 'wateringtimertalve1' ) {
my $duration = join( " ", @args );
$payload = '"name":"watering_timer_1","parameters":{"duration":' . $duration . '}';
$payload = '"name":"watering_timer_valve_1","parameters":{"duration":' . $duration . '}';
### Sensors
} elsif( lc $cmd eq 'refresh' ) {
@ -255,7 +255,7 @@ sub GardenaSmartDevice_Set($@) {
my $list = '';
$list .= 'parkUntilFurtherNotice:noArg parkUntilNextTimer:noArg startResumeSchedule:noArg startOverrideTimer:slider,0,60,1440 startpoint' if( AttrVal($name,'model','unknown') eq 'mower' );
$list .= 'manualOverride:slider,0,1,59 cancelOverride:noArg' if( AttrVal($name,'model','unknown') eq 'watering_computer' );
$list .= 'watering_timer_1,0,1,59' if( AttrVal($name,'model','unknown') eq 'ic24' );
$list .= 'wateringTimerValve1:slider,0,1,59' if( AttrVal($name,'model','unknown') eq 'ic24' );
$list .= 'refresh:temperature,light,humidity' if( AttrVal($name,'model','unknown') eq 'sensor' );
return "Unknown argument $cmd, choose one of $list";