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

added: some more logging on startup

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@3636 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2013-08-09 12:08:03 +00:00
parent a068e75c5a
commit eb95ed5a16
1 changed files with 12 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fhem/FHEM/55_GDS.pm
View File

@ -215,6 +215,7 @@ sub GDS_Initialize($) {
sub GDS_Define($$$) { sub GDS_Define($$$) {
my ($hash, $def) = @_; my ($hash, $def) = @_;
my @a = split("[ \t][ \t]*", $def); my @a = split("[ \t][ \t]*", $def);
my $found;
return "syntax: define <name> GDS <username> <password>" if(int(@a) != 4 ); return "syntax: define <name> GDS <username> <password>" if(int(@a) != 4 );
my $name = $hash->{NAME}; my $name = $hash->{NAME};
@ -223,10 +224,18 @@ sub GDS_Define($$$) {
$hash->{helper}{URL} = "ftp-outgoing2.dwd.de"; $hash->{helper}{URL} = "ftp-outgoing2.dwd.de";
$hash->{helper}{INTERVAL} = 3600; $hash->{helper}{INTERVAL} = 3600;
retrieveFile($hash,"conditions"); (undef, $found) = retrieveFile($hash,"conditions");
$sList = getListStationsDropdown(); if($found){
$sList = getListStationsDropdown()
} else {
Log 2, "GDS $name: No datafile (conditions) found";
}
retrieveFile($hash,"alerts"); retrieveFile($hash,"alerts");
($aList, undef) = buildCAPList(); if($found){
($aList, undef) = buildCAPList();
} else {
Log 2, "GDS $name: No datafile (alerts) found";
}
Log 3, "GDS $name created"; Log 3, "GDS $name created";
$hash->{STATE} = "active"; $hash->{STATE} = "active";