FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

46_TeslaPowerwall2AC: fix get data internal timer bug

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@15287 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
LeonGaultier 2017-10-19 10:54:12 +00:00
parent bcf3705f9a
commit 4e0fae8b19
2 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/CHANGED
View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it.
- bugfix: 46_TeslaPowerwall2AC: fix get data internal timer bug
- bugfix: 93_Log2Syslog: typo in commandref
- feature: global dnsHostsFile attribute added (Forum #78025)
- feature: 98_DOIFtools: add getter hsvColorGradient, returns a table of

9
fhem/FHEM/46_TeslaPowerwall2AC.pm
View File

@ -66,7 +66,7 @@ use HttpUtils;
eval "use JSON;1" or $missingModul .= "JSON ";
my $version = "0.2.0";
my $version = "0.2.2";
@ -144,7 +144,7 @@ sub TeslaPowerwall2AC_Define($$) {
$attr{$name}{room} = "Tesla" if( !defined( $attr{$name}{room} ) );
Log3 $name, 3, "TeslaPowerwall2AC ($name) - defined SmartPi Device with Host $host, Port $hash->{PORT} and Interval $hash->{INTERVAL}";
Log3 $name, 3, "TeslaPowerwall2AC ($name) - defined TeslaPowerwall2AC Device with Host $host, Port $hash->{PORT} and Interval $hash->{INTERVAL}";
$modules{TeslaPowerwall2AC}{defptr}{HOST} = $hash;
@ -230,7 +230,8 @@ sub TeslaPowerwall2AC_Notify($$) {
TeslaPowerwall2AC_Timer_GetData($hash) if( grep /^INITIALIZED$/,@{$events}
or grep /^DELETEATTR.$name.disable$/,@{$events} );
or grep /^DELETEATTR.$name.disable$/,@{$events}
or (grep /^DEFINED.$name$/,@{$events} and $init_done) );
return;
}
@ -290,7 +291,7 @@ sub TeslaPowerwall2AC_Timer_GetData($) {
my $name = $hash->{NAME};
if( $init_done and defined($hash->{actionQueue}) and scalar(@{$hash->{actionQueue}}) == 0 ) {
if( defined($hash->{actionQueue}) and scalar(@{$hash->{actionQueue}}) == 0 ) {
if( not IsDisabled($name) ) {
while( my $obj = each %paths ) {
unshift( @{$hash->{actionQueue}}, $obj );