From d9882cd0da687862b0ebde71252eb92c62d12f85 Mon Sep 17 00:00:00 2001 From: nasseeder1 Date: Sat, 11 Jan 2025 21:13:36 +0000 Subject: [PATCH] 76_SolarForecast: fix interruptable key and some minor fixes git-svn-id: https://svn.fhem.de/fhem/trunk@29513 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/76_SolarForecast.pm | 12 +++++++++++- fhem/contrib/DS_Starter/76_SolarForecast.pm | 12 +++++++++++- 2 files changed, 22 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/76_SolarForecast.pm b/fhem/FHEM/76_SolarForecast.pm index a6a1814e1..b9bf627c3 100644 --- a/fhem/FHEM/76_SolarForecast.pm +++ b/fhem/FHEM/76_SolarForecast.pm @@ -12969,6 +12969,11 @@ sub entryGraphic { $paref->{minDif} = $back->{minDif}; # für Typ diff $ret .= _beamGraphic ($paref); + + delete $paref->{maxVal}; # bereinigen vor nächster Ebene + delete $paref->{maxCon}; + delete $paref->{maxDif}; + delete $paref->{minDif}; ## Balkengrafik Ebene 2 ######################### @@ -13001,6 +13006,11 @@ sub entryGraphic { # Balkengrafik Ausgabe ######################## $ret .= _beamGraphic ($paref); + + delete $paref->{maxVal}; # bereinigen vor nächster Ebene + delete $paref->{maxCon}; + delete $paref->{maxDif}; + delete $paref->{minDif}; } $paref->{modulo}++; @@ -14440,7 +14450,7 @@ sub _beamGraphicRemainingHours { my $beam2cont = $paref->{beam2cont}; my $maxVal = $paref->{maxVal}; # dyn. Anpassung der Balkenhöhe oder statisch ? - $maxVal //= $hfcg->{0}{beam1}; # Startwert wenn kein Wert bereits via attr vorgegeben ist + $maxVal = $maxVal ? $maxVal : $hfcg->{0}{beam1}; # Startwert wenn kein Wert bereits via attr vorgegeben ist my ($val1,$val2,$val3,$val4,$val5,$val6,$val7,$val8); my $hbsocs; diff --git a/fhem/contrib/DS_Starter/76_SolarForecast.pm b/fhem/contrib/DS_Starter/76_SolarForecast.pm index a6a1814e1..b9bf627c3 100644 --- a/fhem/contrib/DS_Starter/76_SolarForecast.pm +++ b/fhem/contrib/DS_Starter/76_SolarForecast.pm @@ -12969,6 +12969,11 @@ sub entryGraphic { $paref->{minDif} = $back->{minDif}; # für Typ diff $ret .= _beamGraphic ($paref); + + delete $paref->{maxVal}; # bereinigen vor nächster Ebene + delete $paref->{maxCon}; + delete $paref->{maxDif}; + delete $paref->{minDif}; ## Balkengrafik Ebene 2 ######################### @@ -13001,6 +13006,11 @@ sub entryGraphic { # Balkengrafik Ausgabe ######################## $ret .= _beamGraphic ($paref); + + delete $paref->{maxVal}; # bereinigen vor nächster Ebene + delete $paref->{maxCon}; + delete $paref->{maxDif}; + delete $paref->{minDif}; } $paref->{modulo}++; @@ -14440,7 +14450,7 @@ sub _beamGraphicRemainingHours { my $beam2cont = $paref->{beam2cont}; my $maxVal = $paref->{maxVal}; # dyn. Anpassung der Balkenhöhe oder statisch ? - $maxVal //= $hfcg->{0}{beam1}; # Startwert wenn kein Wert bereits via attr vorgegeben ist + $maxVal = $maxVal ? $maxVal : $hfcg->{0}{beam1}; # Startwert wenn kein Wert bereits via attr vorgegeben ist my ($val1,$val2,$val3,$val4,$val5,$val6,$val7,$val8); my $hbsocs;