diff --git a/CHANGED b/CHANGED index a171be1..5b8f37a 100644 --- a/CHANGED +++ b/CHANGED @@ -1 +1 @@ - [fix] - delete unused schedules + [fix] - cast all propertie as string - fixed bulkupdateifchanged diff --git a/FHEM/74_GardenaSmartDevice.pm b/FHEM/74_GardenaSmartDevice.pm index 8e15369..5f209bf 100644 --- a/FHEM/74_GardenaSmartDevice.pm +++ b/FHEM/74_GardenaSmartDevice.pm @@ -877,7 +877,7 @@ use Data::Dumper; my $schedule_step_int = 0; foreach my $sist (@tmp_ist) { - my $step = scalar(@ist) > 1 ? 2:1; + my $step = scalar(@tmp_ist) > 1 ? 2:1; #print "step laenge $step \n"; print "check $element = $sist\n"; @@ -911,13 +911,13 @@ use Data::Dumper; while ( my ( $r, $v ) = each %{ $event_schedules } ) { readingsBulkUpdateIfChanged( $hash, 'scheduling-schedules_event_' . $event_id - . ( ReadingsVal($name,'error-valve_error_1_valve_id','') ne '' ? "_valve_$valve_id" : '') + #. ( ReadingsVal($name,'error-valve_error_1_valve_id','') ne '' ? "_valve_$valve_id" : '') . '_' . $r, $v) if (ref($v) ne 'HASH' ); readingsBulkUpdateIfChanged( $hash, 'scheduling-schedules_event_' . $event_id - . ( ReadingsVal($name,'error-valve_error_1_valve_id','') ne '' ? "_valve_$valve_id" : '') + #. ( ReadingsVal($name,'error-valve_error_1_valve_id','') ne '' ? "_valve_$valve_id" : '') . '_' . $v->{type}, join(',', @ { $v->{weekdays}}) ) if (ref($v) eq 'HASH' ); diff --git a/controls_GardenaSmartDevice.txt b/controls_GardenaSmartDevice.txt index 843e6c1..9b94dbc 100644 --- a/controls_GardenaSmartDevice.txt +++ b/controls_GardenaSmartDevice.txt @@ -1,2 +1,2 @@ UPD 2022-07-21_19:43:48 49634 FHEM/73_GardenaSmartBridge.pm -UPD 2022-08-07_20:12:20 107711 FHEM/74_GardenaSmartDevice.pm +UPD 2022-08-08_20:47:00 107717 FHEM/74_GardenaSmartDevice.pm