diff --git a/fhem/CHANGED b/fhem/CHANGED index 85eee722a..1a4ed0606 100644 --- a/fhem/CHANGED +++ b/fhem/CHANGED @@ -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: 76_SMAInverter: fix Perl warnings - bugfix: 93_DbRep: fix add newline at the end of DbReadingsVal result, Forum: #103295 - change: 76_SMAPortal: change switch consumer to on<->automatic only in diff --git a/fhem/FHEM/76_SMAInverter.pm b/fhem/FHEM/76_SMAInverter.pm index 5be91e996..96ebb9088 100644 --- a/fhem/FHEM/76_SMAInverter.pm +++ b/fhem/FHEM/76_SMAInverter.pm @@ -32,6 +32,7 @@ eval "use FHEM::Meta;1" or my $modMetaAbsent = 1; # Versions History by DS_Starter our %SMAInverter_vNotesIntern = ( + "2.13.2" => "27.08.2019 fix WARNING: Use of uninitialized value \$_ in substitution (s///) at /opt/fhem//FHEM/Blocking.pm line 238 ", "2.13.1" => "22.08.2019 commandref revised ", "2.13.0" => "20.08.2019 support of Meta.pm ", "2.12.0" => "20.08.2019 set warning to log if SPOT_ETODAY, SPOT_ETOTAL was not delivered or successfully ". @@ -572,7 +573,7 @@ sub SMAInverter_getstatusDoParse($) { # ETOTAL speichern für ETODAY-Berechnung wenn WR ETODAY nicht liefert if ($dt_now >= $oper_stop) { - my $val; + my $val = 0; $val = ReadingsNum($name, "etotal", 0)*1000 if (exists $defs{$name}{READINGS}{etotal}); $val = ReadingsNum($name, "SPOT_ETOTAL", 0) if (exists $defs{$name}{READINGS}{SPOT_ETOTAL}); BlockingInformParent("SMAInverter_setReadingFromBlocking", [$name, ".etotal_yesterday", $val], 0);