diff --git a/fhem/contrib/DS_Starter/76_SolarForecast.pm b/fhem/contrib/DS_Starter/76_SolarForecast.pm index b6cf59f2f..3b05dd4f2 100644 --- a/fhem/contrib/DS_Starter/76_SolarForecast.pm +++ b/fhem/contrib/DS_Starter/76_SolarForecast.pm @@ -6113,8 +6113,9 @@ sub listDataPool { } for my $idx (sort{$a<=>$b} keys %{$h}) { if ($idx !~ /^[0-9]{2}$/ix) { # bereinigen ungültige consumer, Forum: https://forum.fhem.de/index.php/topic,117864.msg1173219.html#msg1173219 - delete $data{$type}{$name}{consumers}{$idx}; + delete $data{$type}{$name}{consumers}{"$idx"}; Log3 ($name, 3, qq{$name - INFO - invalid consumer key "$idx" was deleted from consumer Hash}); + next; } my $cret; for my $ckey (sort keys %{$h->{$idx}}) {