change foreach to for

This commit is contained in:
Marko Oldenburg 2021-02-27 15:28:08 +01:00
parent f723f1efaf
commit a4ddfe9c8a
2 changed files with 2 additions and 2 deletions

View File

@ -719,7 +719,7 @@ sub ReadingsProcessing_Powerwalls {
and scalar( @{ $decode_json->{powerwalls} } ) > 0 )
{
my $i = 0;
foreach my $powerwall ( @{ $decode_json->{powerwalls} } ) {
for my $powerwall ( @{ $decode_json->{powerwalls} } ) {
if ( ref($powerwall) eq 'HASH' ) {
while ( my ( $r, $v ) = each %{$powerwall} ) {

View File

@ -1 +1 @@
UPD 2021-02-27_14:54:29 30720 FHEM/46_TeslaPowerwall2AC.pm
UPD 2021-02-27_15:27:28 30716 FHEM/46_TeslaPowerwall2AC.pm