change license reading

This commit is contained in:
Marko Oldenburg
2019-01-10 14:58:51 +01:00
parent 9c9e790d88
commit 9fddd33c83
3 changed files with 7 additions and 4 deletions

View File

@@ -364,6 +364,7 @@ sub Weather_WriteReadings($$) {
foreach my $r (keys %{$dataRef} ) {
readingsBulkUpdate($hash, $r, $dataRef->{$r})
if ( ref($dataRef->{$r}) ne 'HASH' and ref($dataRef->{$r}) ne 'ARRAY' );
readingsBulkUpdate($hash, '.license', $dataRef->{license}->{text});
}
readingsBulkUpdate($hash, "validity", "up-to-date");
@@ -485,12 +486,13 @@ sub Weather_Get($@) {
my $value;
if(defined($hash->{READINGS}->{$reading})) {
$value= $hash->{READINGS}->{$reading}->{VAL};
$value = $hash->{READINGS}->{$reading}->{VAL};
} else {
my $rt= "";
my $rt = '';
if(defined($hash->{READINGS})) {
$rt= join(":noArg ", sort keys %{$hash->{READINGS}});
$rt = join(":noArg ", sort keys %{$hash->{READINGS}});
}
return "Unknown reading $reading, choose one of " . $rt;
}