FHEM/mod-TeslaPowerwall2AC
1
0
Fork 0
Code Issues 3 Pull Requests Releases Wiki Activity

test

Browse Source
This commit is contained in:
Marko Oldenburg 2019-09-28 09:16:08 +02:00
parent f6dd7a370e
commit d6fb304ae1
1 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
46_TeslaPowerwall2AC.pm
View File

@ -181,7 +181,7 @@ my %paths = (
'powerwalls' => 'powerwalls', 'powerwalls' => 'powerwalls',
'registration' => 'customer/registration', 'registration' => 'customer/registration',
'status' => 'status', 'status' => 'status',
'login' => 'login/Basic', # 'login' => 'login/Basic',
'gridstatus' => 'system_status/grid_status', 'gridstatus' => 'system_status/grid_status',
); );
@ -481,6 +481,12 @@ sub ErrorHandling($$$) {
my $hash = $param->{hash}; my $hash = $param->{hash};
my $name = $hash->{NAME}; my $name = $hash->{NAME};
print( 'TESLA DEBUG1 - Path: ' . $param->{setCmd} );
print( 'TESLA DEBUG1 - ResponseString: ' . Dumper $data );
print( 'TESLA DEBUG1 - Error: ' . $err . "\n" )
unless ( defined($err)
and $err);
# my $path = $param->{setCmd}; # temporär # my $path = $param->{setCmd}; # temporär
# #### temporär # #### temporär
@ -798,9 +804,10 @@ sub ErrorHandling($$$) {
Log3 $name, 4, "TeslaPowerwall2AC ($name) - Recieve JSON data: $data"; Log3 $name, 4, "TeslaPowerwall2AC ($name) - Recieve JSON data: $data";
print( 'TESLA DEBUG - ResponseString: ' . Dumper $data); print( 'TESLA DEBUG2 - ResponseString: ' . Dumper $data );
print( 'TESLA DEBUG - Error: ' . $err . "\n" ) print( 'TESLA DEBUG2 - Error: ' . $err . "\n" )
unless ($err); unless ( defined($err)
and $err);
# ResponseProcessing( $hash, $param->{setCmd}, $data ); # ResponseProcessing( $hash, $param->{setCmd}, $data );
} }