mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

76_SolarForecast: fix Perl warning in release 1.53.0

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@30084 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
DS_Starter
2025-06-30 15:51:30 +00:00
parent 96bcfe9038
commit 3ece1f117e
2 changed files with 9 additions and 7 deletions
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. # 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 # Do not insert empty lines here, update check depends on it
- bugfix: 76_SolarForecast: fix Perl warning in release 1.53.0
- feature: 76_SolarForecast: minor release 1.53.0 - feature: 76_SolarForecast: minor release 1.53.0
- feature: 76_SolarForecast: new special Reading conForecastComingNight - feature: 76_SolarForecast: new special Reading conForecastComingNight
- change: 76_SolarForecast: remainingSurplsHrsMinPwrBat_: calculate with two - change: 76_SolarForecast: remainingSurplsHrsMinPwrBat_: calculate with two

15
fhem/FHEM/76_SolarForecast.pm
View File

@@ -160,6 +160,7 @@ BEGIN {
# Versions History intern # Versions History intern
my %vNotesIntern = ( my %vNotesIntern = (
"1.53.1" => "30.06.2025 add utf8 smileys, fix Perl warning uninitialized value \$color ",
"1.53.0" => "28.06.2025 new battery style (batcontainer), new key setupBatteryDevXX->label, new reading Battery_ChargeUnrestricted_XX ". "1.53.0" => "28.06.2025 new battery style (batcontainer), new key setupBatteryDevXX->label, new reading Battery_ChargeUnrestricted_XX ".
"attribute graphicShowDiff replaced by graphicControl->showDiff ". "attribute graphicShowDiff replaced by graphicControl->showDiff ".
"check local coordinates are set in global device and fill message system if failure ". "check local coordinates are set in global device and fill message system if failure ".
@@ -944,12 +945,12 @@ my %hqtxt = ( # H
DE => qq{Die FHEM Tablet UI Widget-Dateien sind nicht aktuell.} }, DE => qq{Die FHEM Tablet UI Widget-Dateien sind nicht aktuell.} },
widerr => { EN => qq{The FHEM Tablet UI V2 is installed but the update status of widget Files can't be checked.}, widerr => { EN => qq{The FHEM Tablet UI V2 is installed but the update status of widget Files can't be checked.},
DE => qq{FTUI V2 ist installiert, der Aktualisierungsstatus der Widgets kann nicht geprüft werden.} }, DE => qq{FTUI V2 ist installiert, der Aktualisierungsstatus der Widgets kann nicht geprüft werden.} },
pmtp => { EN => qq{produced more than predicted :-D}, pmtp => { EN => qq{produced more than predicted 😃},
DE => qq{mehr produziert als vorhergesagt :-D} }, DE => qq{mehr produziert als vorhergesagt 😃} },
petp => { EN => qq{produced same as predicted :-)}, petp => { EN => qq{produced same as predicted 😊},
DE => qq{produziert wie vorhergesagt :-)} }, DE => qq{produziert wie vorhergesagt 😊} },
pltp => { EN => qq{produced less than predicted :-(}, pltp => { EN => qq{produced less than predicted 😓},
DE => qq{weniger produziert als vorhergesagt :-(} }, DE => qq{weniger produziert als vorhergesagt 😓} },
wusond => { EN => qq{wait until sunset}, wusond => { EN => qq{wait until sunset},
DE => qq{bis zum Sonnenuntergang warten} }, DE => qq{bis zum Sonnenuntergang warten} },
snbefb => { EN => qq{Should not be empty. Maybe the device has just been redefined.}, snbefb => { EN => qq{Should not be empty. Maybe the device has just been redefined.},
@@ -18706,7 +18707,7 @@ sub __substituteIcon {
$txt = $pretxt.$soctxt; # resultierender Text $txt = $pretxt.$soctxt; # resultierender Text
} }
if ($color eq 'dyn') { if ($color && $color eq 'dyn') {
$color = val2dynColor ($soc, 0, $flag ? 0 : 0.4); $color = val2dynColor ($soc, 0, $flag ? 0 : 0.4);
} }
} }