fix hash in reading

This commit is contained in:
Marko Oldenburg 2021-02-27 16:41:31 +01:00
parent ed2b5f531d
commit cdc37dd24c
2 changed files with 4 additions and 3 deletions

View File

@ -723,7 +723,8 @@ sub ReadingsProcessing_Powerwalls {
if ( ref($powerwall) eq 'HASH' ) { if ( ref($powerwall) eq 'HASH' ) {
while ( my ( $r, $v ) = each %{$powerwall} ) { while ( my ( $r, $v ) = each %{$powerwall} ) {
$readings{ 'wall_' . $i . '_' . $r } = $v; $readings{ 'wall_' . $i . '_' . $r } = $v
if ( ref($v) ne 'HASH' );
if ( ref($v) eq 'HASH' ) { if ( ref($v) eq 'HASH' ) {
while ( my ( $s, $t ) = each %{$v} ) { while ( my ( $s, $t ) = each %{$v} ) {
@ -1087,7 +1088,7 @@ sub Rename {
], ],
"release_status": "stable", "release_status": "stable",
"license": "GPL_2", "license": "GPL_2",
"version": "v1.0.0", "version": "v1.0.1",
"author": [ "author": [
"Marko Oldenburg <leongaultier@gmail.com>" "Marko Oldenburg <leongaultier@gmail.com>"
], ],

View File

@ -1 +1 @@
UPD 2021-02-27_15:47:38 30957 FHEM/46_TeslaPowerwall2AC.pm UPD 2021-02-27_16:41:15 31004 FHEM/46_TeslaPowerwall2AC.pm