FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

50_HP1000.pm: mixed upper/lowercase readings

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@9947 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
jpawlowski 2015-11-20 23:35:39 +00:00
parent d44d05b15e
commit cf6353c7ce
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
fhem/FHEM/50_HP1000.pm
View File

@ -32,7 +32,7 @@ use vars qw(%data);
use HttpUtils;
use Time::Local;
use Data::Dumper;
use 98_dewpoint;
use FHEM::98_dewpoint;
no if $] >= 5.017011, warnings => 'experimental::smartmatch';
@ -203,7 +203,7 @@ sub HP1000_CGI() {
$p = "windGust" if ($p eq "windgust");
$p = "windSpeed" if ($p eq "windspeed");
readingsBulkUpdate( $hash, lc($p), $v );
readingsBulkUpdate( $hash, $p, $v );
}
# calculated readings
@ -211,19 +211,19 @@ sub HP1000_CGI() {
# dewpointIndoor
if (defined($webArgs->{intemp}) && defined($webArgs->{inhumi})) {
my $v = dewpoint_dewpoint($webArgs->{intemp}, $webArgs->{inhumi});
my $v = int( dewpoint_dewpoint($webArgs->{intemp}, $webArgs->{inhumi}) + 0.5 );
readingsBulkUpdate( $hash, "dewpointIndoor", $v );
}
# humidityAbs
if (defined($webArgs->{outtemp}) && defined($webArgs->{outhumi})) {
my $v = dewpoint_absFeuchte($webArgs->{outtemp}, $webArgs->{outhumi});
my $v = int( dewpoint_absFeuchte($webArgs->{outtemp}, $webArgs->{outhumi}) + 0.5 );
readingsBulkUpdate( $hash, "humidityAbs", $v );
}
# humidityIndoorAbs
if (defined($webArgs->{intemp}) && defined($webArgs->{inhumi})) {
my $v = dewpoint_absFeuchte($webArgs->{intemp}, $webArgs->{inhumi});
my $v = int( dewpoint_absFeuchte($webArgs->{intemp}, $webArgs->{inhumi}) + 0.5 );
readingsBulkUpdate( $hash, "humidityIndoorAbs", $v );
}