2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 03:06:37 +00:00

added: createIndexFile()

git-svn-id: https://svn.fhem.de/fhem/trunk@3664 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2013-08-11 01:00:15 +00:00
parent bdd7765dc8
commit 96530271c3

View File

@ -250,6 +250,7 @@ sub GDS_Initialize($) {
$readingFnAttributes;
CommandDefine(undef, "gds_web HTTPSRV gds /tmp/ GDS Files");
createIndexFile();
}
sub GDS_Define($$$) {
@ -949,6 +950,18 @@ sub sepLine($) {
return $output;
}
sub createIndexFile(){
my $text = "<html><head></head><body>".
"<a href=\"/fhem/gds/cmap.jpg\" target=\"blank\">Aktuelle Wetterkarte: Wetterlage</a><br/>".
"<a href=\"/fhem/gds/fmap.jpg\" target=\"blank\">Aktuelle Wetterkarte: Vorhersage</a><br/>".
"<a href=\"/fhem/gds/wmap.jpg\" target=\"blank\">Aktuelle Wetterkarte: Warnungen</a><br/>".
"<a href=\"/fhem/gds/rmap.jpg\" target=\"blank\">Aktuelle Radarkarte</a><br/>".
"</body></html>";
open (DATEI, ">/tmp/index.html") or die $!;
print DATEI $text;
close (DATEI);
return;
}
1;