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

insert debug output

Browse Source
This commit is contained in:
Marko Oldenburg 2019-09-27 06:16:40 +02:00
parent 410cb53b52
commit 57a51e8984
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

@ -482,6 +482,13 @@ sub ErrorHandling($$$) {
my $name = $hash->{NAME};
# my $path = $param->{setCmd}; # temporär
print('TESLA DEBUG - ResponseString: ' . Dumper $data);
print('TESLA DEBUG - Error: ' . $err . "\n")
unless ($err);
# #### temporär
# if ( $path eq 'statussoe' ) {
@ -728,7 +735,7 @@ sub ErrorHandling($$$) {
Log3 $name, 3, "TeslaPowerwall2AC ($name) - RequestERROR: $err";
$hash->{actionQueue} = [];
return;
# return;
}
}
@ -750,7 +757,7 @@ sub ErrorHandling($$$) {
. " without any data after requesting";
$hash->{actionQueue} = [];
return;
# return;
}
if ( ( $data =~ /Error/i ) and exists( $param->{code} ) ) {
@ -767,7 +774,7 @@ sub ErrorHandling($$$) {
. $param->{code};
$hash->{actionQueue} = [];
return;
# return;
### End Error Handling
}
@ -777,7 +784,7 @@ sub ErrorHandling($$$) {
Log3 $name, 4, "TeslaPowerwall2AC ($name) - Recieve JSON data: $data";
ResponseProcessing( $hash, $param->{setCmd}, $data );
# ResponseProcessing( $hash, $param->{setCmd}, $data );
}
sub ResponseProcessing($$$) {