mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-01-31 06:39:11 +00:00
check modules for compiletime errors and deactivated it, if any
git-svn-id: https://svn.fhem.de/fhem/trunk@183 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
2682aa8ee6
commit
b09f8b9a78
@ -140,7 +140,7 @@ my %intAt; # Internal at timer hash.
|
||||
my $intAtCnt=0;
|
||||
my $reread_active = 0;
|
||||
my $AttrList = "room comment";
|
||||
my $cvsid = '$Id: fhem.pl,v 1.43 2008-05-11 17:27:01 tdressler Exp $';
|
||||
my $cvsid = '$Id: fhem.pl,v 1.44 2008-05-11 21:03:13 tdressler Exp $';
|
||||
|
||||
$init_done = 0;
|
||||
|
||||
@ -1263,13 +1263,16 @@ CommandReload($$)
|
||||
my $order = $1;
|
||||
Log 5, "Loading $file";
|
||||
|
||||
my $ret;
|
||||
|
||||
no strict "refs";
|
||||
# Get the correct module case from the initialize function name. We need
|
||||
# this as sometimes we live on a FAT fs with wrong case
|
||||
eval {
|
||||
do "$file";
|
||||
my $ret=do "$file";
|
||||
if (!$ret) {
|
||||
Log 1,"Error:Modul $param deactivated:\n $@";
|
||||
return "$@";
|
||||
}
|
||||
foreach my $i (keys %main::) {
|
||||
if($i =~ m/^(${m})_initialize$/i) {
|
||||
$m = $1;
|
||||
|
Loading…
Reference in New Issue
Block a user