FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-28 05:01:57 +00:00
Code Issues Releases Wiki Activity

PROPLANTA: bugfix umlaute, feature 24h-rain

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@8569 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
tpoitzsch 2015-05-12 19:14:55 +00:00
parent c62d92674a
commit 489dbe0eda
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fhem/FHEM/59_PROPLANTA.pm
View File

@ -110,6 +110,7 @@ my $curReadingType = 0;
,["NS_15", "rain15", 2]
,["NS_18", "rain18", 2]
,["NS_21", "rain21", 2]
,["NS_24H", "rain", 2]
,["BD_0", "cloud00", 2]
,["BD_3", "cloud03", 2]
,["BD_6", "cloud06", 2]
@ -460,10 +461,20 @@ sub PROPLANTA_Define($$)
{ # {my $test="http://www.proplanta.de/Wetter/LOKALERORT-Wetter.html";; $test =~ s/LOKALERORT/München/g;; return $test;;}
return "Wrong country code '$lang': use " . join(" | ", keys( %url_template_1 ) ) unless defined( $url_template_1{$lang} );
my $URL = $url_template_1{$lang};
$URL =~ s/LOKALERORT/$a[2]/g;
my $ort= $a[2];
# change Umlaute from UTF8 in Percent-encode
$ort =~ s/Ä|Ä/%C4/g;
$ort =~ s/Ö|Ö/%D6/g;
$ort =~ s/Ü|Ãœ/%DC/g;
$ort =~ s/ß|ß/%DF/g;
$ort =~ s/ä|ä/%E4/g;
$ort =~ s/ö|ö/%F6/g;
$ort =~ s/ü|ü/%FC/g;
$URL =~ s/LOKALERORT/$ort/g;
$hash->{URL} = $URL;
$URL = $url_template_2{$lang};
$URL =~ s/LOKALERORT/$a[2]/g;
$URL =~ s/LOKALERORT/$ort/g;
$hash->{URL2} = $URL;
}