FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-25 03:44:52 +00:00
Code Issues Releases Wiki Activity

76_SolarForecast: V 1.37.4 internal code change

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@29316 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2024-10-30 07:28:35 +00:00
parent 64f392e5b9
commit 6d3e3c821f
2 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fhem/FHEM/76_SolarForecast.pm
View File

@ -652,8 +652,6 @@ my %hrepl = ( # Z
'.' => 'k', '.' => 'k',
); );
my @hreplkeys = keys %hrepl;
my %hqtxt = ( # Hash (Setup) Texte my %hqtxt = ( # Hash (Setup) Texte
entry => { EN => qq{<b>Warm welcome!</b><br> entry => { EN => qq{<b>Warm welcome!</b><br>
The next queries will guide you through the basic installation.<br> The next queries will guide you through the basic installation.<br>
@ -14241,10 +14239,13 @@ sub _flowGraphic {
my $scale = $fgscaledef; my $scale = $fgscaledef;
my $pdist = 130; # Abstand Producer zueinander my $pdist = 130; # Abstand Producer zueinander
my $hasbat = 1; # initial Batterie vorhanden my $hasbat = 1; # initial Batterie vorhanden
my $stna = $name;
my ($lcp, $y_pos, $y_pos1); my ($lcp, $y_pos, $y_pos1);
my $stna = $name; for my $re (keys %hrepl) { # V 1.37.1 Ziffern etc. eliminieren, Forum: https://forum.fhem.de/index.php?msg=1323229
$stna =~ s/([@hreplkeys])/$hrepl{$1}/ge if($name =~ /[@hreplkeys]/xs); # V 1.37.1 Ziffern etc. eliminieren, Forum: https://forum.fhem.de/index.php?msg=1323229 $stna =~ s/$re/$hrepl{$re}/gxs;
}
## definierte Producer + Inverter ermitteln und zusammenfassen ## definierte Producer + Inverter ermitteln und zusammenfassen
################################################################ ################################################################

9
fhem/contrib/DS_Starter/76_SolarForecast.pm
View File

@ -652,8 +652,6 @@ my %hrepl = ( # Z
'.' => 'k', '.' => 'k',
); );
my @hreplkeys = keys %hrepl;
my %hqtxt = ( # Hash (Setup) Texte my %hqtxt = ( # Hash (Setup) Texte
entry => { EN => qq{<b>Warm welcome!</b><br> entry => { EN => qq{<b>Warm welcome!</b><br>
The next queries will guide you through the basic installation.<br> The next queries will guide you through the basic installation.<br>
@ -14241,10 +14239,13 @@ sub _flowGraphic {
my $scale = $fgscaledef; my $scale = $fgscaledef;
my $pdist = 130; # Abstand Producer zueinander my $pdist = 130; # Abstand Producer zueinander
my $hasbat = 1; # initial Batterie vorhanden my $hasbat = 1; # initial Batterie vorhanden
my $stna = $name;
my ($lcp, $y_pos, $y_pos1); my ($lcp, $y_pos, $y_pos1);
my $stna = $name; for my $re (keys %hrepl) { # V 1.37.1 Ziffern etc. eliminieren, Forum: https://forum.fhem.de/index.php?msg=1323229
$stna =~ s/([@hreplkeys])/$hrepl{$1}/ge if($name =~ /[@hreplkeys]/xs); # V 1.37.1 Ziffern etc. eliminieren, Forum: https://forum.fhem.de/index.php?msg=1323229 $stna =~ s/$re/$hrepl{$re}/gxs;
}
## definierte Producer + Inverter ermitteln und zusammenfassen ## definierte Producer + Inverter ermitteln und zusammenfassen
################################################################ ################################################################