2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00

fhem.pl: better retunr in AnalyzePerlCommand (Forum #89953)

git-svn-id: https://svn.fhem.de/fhem/trunk@17089 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2018-08-04 16:59:23 +00:00
parent ee6ea0cc29
commit 1d2318d563

View File

@ -1110,8 +1110,10 @@ AnalyzePerlCommand($$;$)
$cmdFromAnalyze = $cmd; $cmdFromAnalyze = $cmd;
my $ret = eval $cmd; my $ret = eval $cmd;
Log 1, "ERROR evaluating $cmd: $@" if($@); if($@) {
$ret = $@ if($@); $ret = $@;
Log 1, "ERROR evaluating $cmd: $ret";
}
$cmdFromAnalyze = undef; $cmdFromAnalyze = undef;
return $ret; return $ret;
} }