Public/fhem-mirror
1
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-05-01 20:20:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

CTZ.pm: publish func reqModFail

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@25827 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2022-03-13 17:27:08 +00:00
parent 882990cd5a
commit 9dbc3e38d3
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lib/FHEM/Utility/CTZ.pm
View File

@ -87,7 +87,7 @@ sub convertTimeZone {
} }
my $rmf = reqModFail(); my $rmf = reqModFail();
return $rmf if($rmf); return "required perl module not installed: ".$rmf if($rmf);
my $name = $paref->{name} // $pkg; my $name = $paref->{name} // $pkg;
my $dtstring = $paref->{dtstring} // q{}; my $dtstring = $paref->{dtstring} // q{};
@ -136,8 +136,9 @@ return $valid;
sub getTZNames { sub getTZNames {
my $rmf = reqModFail(); my $rmf = reqModFail();
if($rmf) { if($rmf) {
$rmf = "ERROR - ".$rmf; $rmf = "ERROR - required perl module not installed: ".$rmf;
Log (1, "$pkg - $rmf"); Log (1, "$pkg - $rmf");
return [($rmf)]; return [($rmf)];
} }
@ -157,7 +158,7 @@ sub reqModFail {
push @ma, $abs0 if($abs0); push @ma, $abs0 if($abs0);
push @ma, $abs1 if($abs1); push @ma, $abs1 if($abs1);
my $err = "required perl module not installed: ".join ", ", @ma; my $err = join ", ", @ma;
return $err; return $err;
} }