diff --git a/46_Aqicn.pm b/46_Aqicn.pm index 1776dd0..b1b594b 100644 --- a/46_Aqicn.pm +++ b/46_Aqicn.pm @@ -67,7 +67,7 @@ eval "use Encode qw(encode encode_utf8 decode_utf8);1" or $missingModul .= "Enco eval "use JSON;1" or $missingModul .= "JSON "; -my $version = "0.0.33"; +my $version = "0.0.36"; @@ -86,7 +86,7 @@ sub Aqicn_ReadingsProcessing_AqiResponse($); sub Aqicn_ErrorHandling($$$); sub Aqicn_WriteReadings($$); sub Aqicn_Timer_GetData($); -sub Aqicn_AirPollutionLevel($); +sub Aqicn_AirPollutionLevel($$); @@ -114,6 +114,7 @@ sub Aqicn_Initialize($) { $hash->{AttrFn} = "Aqicn_Attr"; $hash->{AttrList} = "interval ". "disable:1 ". + "language:de,en". $readingFnAttributes; foreach my $d(sort keys %{$modules{Aqicn}{defptr}}) { @@ -360,13 +361,12 @@ sub Aqicn_ErrorHandling($$$) { my $hash = $param->{hash}; my $name = $hash->{NAME}; - - #Log3 $name, 3, "Aqicn ($name) - Recieve JSON data: $data"; + + Log3 $name, 4, "Aqicn ($name) - Recieve JSON data: $data"; #Log3 $name, 3, "Aqicn ($name) - Recieve HTTP Code: $param->{code}"; #Log3 $name, 3, "Aqicn ($name) - Recieve Error: $err"; - - + ### Begin Error Handling if( defined( $err ) ) { @@ -473,7 +473,7 @@ sub Aqicn_WriteReadings($$) { readingsBulkUpdate($hash,$r,$v); } - readingsBulkUpdateIfChanged($hash,'state',Aqicn_AirPollutionLevel($readings->{'PM2.5-AQI'})); + readingsBulkUpdateIfChanged($hash,'state',Aqicn_AirPollutionLevel($hash,$readings->{'PM2.5-AQI'})); readingsEndUpdate($hash,1); } @@ -508,7 +508,8 @@ sub Aqicn_ReadingsProcessing_SearchStationResponse($$) { } else { $ret .= '