testing #52

Merged
marko merged 5 commits from testing into main 2023-02-05 08:48:33 +00:00
2 changed files with 12 additions and 5 deletions
Showing only changes of commit 43e3fcb237 - Show all commits

View File

@ -1,5 +1,5 @@
UPD 2023-01-29_16:14:48 25809 FHEM/59_Weather.pm UPD 2023-01-29_16:14:48 25809 FHEM/59_Weather.pm
UPD 2023-02-02_22:56:41 33947 lib/FHEM/Core/Weather.pm UPD 2023-02-05_09:19:03 34095 lib/FHEM/Core/Weather.pm
UPD 2023-01-29_16:14:48 50106 lib/FHEM/APIs/Weather/DarkSkyAPI.pm UPD 2023-01-29_16:14:48 50106 lib/FHEM/APIs/Weather/DarkSkyAPI.pm
UPD 2023-01-29_16:14:48 33422 lib/FHEM/APIs/Weather/OpenWeatherMapAPI.pm UPD 2023-01-29_16:14:48 33422 lib/FHEM/APIs/Weather/OpenWeatherMapAPI.pm
UPD 2023-01-29_16:14:48 36101 lib/FHEM/APIs/Weather/wundergroundAPI.pm UPD 2023-01-29_16:14:48 36101 lib/FHEM/APIs/Weather/wundergroundAPI.pm

View File

@ -32,9 +32,18 @@ package FHEM::Core::Weather;
use strict; use strict;
use warnings; use warnings;
use Time::HiRes qw(gettimeofday); my $missingModul = 'apt install';
eval { use Time::HiRes qw /gettimeofday/; 1 }
or $missingModul .= "libtime-hires-perl ";
eval { use Readonly; 1 }
or $missingModul .= "libreadonly-perl ";
#use Time::HiRes qw(gettimeofday);
use experimental qw /switch/; use experimental qw /switch/;
use Readonly;
#use Readonly;
use FHEM::Meta; use FHEM::Meta;
@ -318,8 +327,6 @@ sub _ReturnWithError {
} }
sub DeleteForecastreadings { sub DeleteForecastreadings {
return 0 unless ( __PACKAGE__ eq caller(0) );
my $hash = shift; my $hash = shift;
my $name = $hash->{NAME}; my $name = $hash->{NAME};