mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-15 22:26:04 +00:00
CTZ.pm: publish func reqModFail
git-svn-id: https://svn.fhem.de/fhem/trunk@25827 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
7d76713238
commit
2c8b88183f
@ -87,7 +87,7 @@ sub convertTimeZone {
|
||||
}
|
||||
|
||||
my $rmf = reqModFail();
|
||||
return $rmf if($rmf);
|
||||
return "required perl module not installed: ".$rmf if($rmf);
|
||||
|
||||
my $name = $paref->{name} // $pkg;
|
||||
my $dtstring = $paref->{dtstring} // q{};
|
||||
@ -136,8 +136,9 @@ return $valid;
|
||||
sub getTZNames {
|
||||
|
||||
my $rmf = reqModFail();
|
||||
|
||||
if($rmf) {
|
||||
$rmf = "ERROR - ".$rmf;
|
||||
$rmf = "ERROR - required perl module not installed: ".$rmf;
|
||||
Log (1, "$pkg - $rmf");
|
||||
return [($rmf)];
|
||||
}
|
||||
@ -157,7 +158,7 @@ sub reqModFail {
|
||||
push @ma, $abs0 if($abs0);
|
||||
push @ma, $abs1 if($abs1);
|
||||
|
||||
my $err = "required perl module not installed: ".join ", ", @ma;
|
||||
my $err = join ", ", @ma;
|
||||
|
||||
return $err;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user