Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-04 22:19:38 +00:00
Code Issues Packages Projects Releases Wiki Activity

contrib/55_GDS.2015: updated

Browse Source 
added more set clear … commands

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@9409 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2015-10-09 00:42:28 +00:00
parent 8497df39a4
commit cb79a3e771
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
contrib/55_GDS.2015/55_GDS.pm
View File

@ -122,7 +122,7 @@ sub GDS_Shutdown($) {
sub GDS_Set($@) { sub GDS_Set($@) {
my ($hash, @a) = @_; my ($hash, @a) = @_;
my $name = $hash->{NAME}; my $name = $hash->{NAME};
my $usage = "Unknown argument, choose one of clear:alerts,all help:noArg rereadcfg:noArg update:noArg ". my $usage = "Unknown argument, choose one of clear:alerts,conditions,forecasts,all help:noArg rereadcfg:noArg update:noArg ".
"conditions:".$sList." forecasts:".$fList." "; "conditions:".$sList." forecasts:".$fList." ";
readingsSingleUpdate($hash, '_tzOffset', _calctz(time,localtime(time))*3600, 0); readingsSingleUpdate($hash, '_tzOffset', _calctz(time,localtime(time))*3600, 0);
@ -145,10 +145,14 @@ sub GDS_Set($@) {
given($command) { given($command) {
when("clear"){ when("clear"){
CommandDeleteReading(undef, "$name a_.*"); CommandDeleteReading(undef, "$name a_.*")
CommandDeleteReading(undef, "$name c_.*") if(defined($parameter) && $parameter eq "all"); if(defined($parameter) && ($parameter eq "all" || $parameter eq "alerts"));
CommandDeleteReading(undef, "$name fc.?_.*") if(defined($parameter) && $parameter eq "all"); CommandDeleteReading(undef, "$name c_.*")
CommandDeleteReading(undef, "$name g_.*") if(defined($parameter) && $parameter eq "all"); if(defined($parameter) && ($parameter eq "all" || $parameter eq "conditions"));
CommandDeleteReading(undef, "$name g_.*")
if(defined($parameter) && ($parameter eq "all" || $parameter eq "conditions"));
CommandDeleteReading(undef, "$name fc.?_.*")
if(defined($parameter) && ($parameter eq "all" || $parameter eq "forecasts"));
} }
when("help"){ when("help"){
@ -2074,6 +2078,7 @@ sub GDSAsHtmlD($;$) {
# 2015-10-09 changed removed createIndexFile(), no longer needed since 2015-01-30 # 2015-10-09 changed removed createIndexFile(), no longer needed since 2015-01-30
# added forecast retrieval # added forecast retrieval
# added weblink generator # added weblink generator
# added more "set clear ..." commands
# done a lot of code cleanup # done a lot of code cleanup
# #
#################################################################################################### ####################################################################################################