55_GDS.pm: adopt changes for conditons made by DWD
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@10388 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -1295,7 +1295,7 @@ sub _retrieveCONDITIONS {
|
|||||||
if(@files) {
|
if(@files) {
|
||||||
Log3($name, 4, "GDS $name: filelist found.");
|
Log3($name, 4, "GDS $name: filelist found.");
|
||||||
@files = sort(@files);
|
@files = sort(@files);
|
||||||
my $datafile = $files[-1];
|
my $datafile = $files[-2];
|
||||||
Log3($name, 5, "GDS $name: retrieving $datafile");
|
Log3($name, 5, "GDS $name: retrieving $datafile");
|
||||||
my ($file_content,$file_handle);
|
my ($file_content,$file_handle);
|
||||||
open($file_handle, '>', \$file_content);
|
open($file_handle, '>', \$file_content);
|
||||||
@@ -1939,6 +1939,8 @@ sub getListForecastStations($) {
|
|||||||
#
|
#
|
||||||
###################################################################################################
|
###################################################################################################
|
||||||
#
|
#
|
||||||
|
# 2016-01-01 fixed use txt file instead html for conditions (adopt DWD changes)
|
||||||
|
#
|
||||||
# 2015-12-31 fixed conditions retrieval on startup
|
# 2015-12-31 fixed conditions retrieval on startup
|
||||||
#
|
#
|
||||||
# 2015-11-26 fixed wrong region handling
|
# 2015-11-26 fixed wrong region handling
|
||||||
|
|||||||
Reference in New Issue
Block a user