From e11a73f5e0891fa07147e692502799bb4c0414e8 Mon Sep 17 00:00:00 2001 From: betateilchen Date: Mon, 21 Mar 2016 08:20:57 +0000 Subject: [PATCH] 55_GDS.pm: add error message for stations list git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@11108 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/55_GDS.pm | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/fhem/FHEM/55_GDS.pm b/fhem/FHEM/55_GDS.pm index 0fedb30d1..dc47e5cfa 100644 --- a/fhem/FHEM/55_GDS.pm +++ b/fhem/FHEM/55_GDS.pm @@ -421,9 +421,8 @@ sub GDS_Set($@) { } when("conditions"){ - CommandAttr(undef, "$name gdsSetCond $parameter"); -# $attr{$name}{gdsSetCond} = $parameter; #ReadingsVal($name,'c_stationName',undef); return "conditions no longer available after 15.03.2016" if (time > 1457996400); + CommandAttr(undef, "$name gdsSetCond $parameter"); GDS_GetUpdate($hash,'set conditions'); break; } @@ -448,9 +447,10 @@ sub GDS_Get($@) { my $name = $hash->{NAME}; my $usage = "Unknown argument $command, choose one of help:noArg rereadcfg:noArg ". - "list:stations,capstations,data ". +# "list:stations,capstations,data ". + "list:capstations,data ". "alerts:".$aList." ". - "conditions:".$sList." ". +# "conditions:".$sList." ". "conditionsmap:".$cmapList." ". "forecasts:".$fcList." ". "forecastsmap:".$fmapList." ". @@ -532,6 +532,7 @@ sub GDS_Get($@) { $result = getListCapStations($hash,$parameter); } when("data") { $result = latin1ToUtf8(join("\n",@allConditionsData)); } # new when("stations") { + return "stations list no longer available after 15.03.2016" if (time > 1457996400); my @a = map (latin1ToUtf8(substr($_,0,19)), @allConditionsData); unshift(@a, "Use one of the following stations:", sepLine(40)); $result = join("\n",@a);