mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

98_RandomTimer: the processing of a error improved get rig of a PERL WARING: http://forum.fhem.de/index.php/topic,14010.msg243159.html#msg243159

Browse Source 
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@7495 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
dietmar63
2015-01-10 16:17:04 +00:00
parent 795657c9c3
commit ede96c2589
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
fhem/FHEM/98_RandomTimer.pm
View File

@@ -409,7 +409,10 @@ sub RandomTimer_isDisabled($) {
my $disableCond = AttrVal($hash->{NAME}, "disableCond", ""); my $disableCond = AttrVal($hash->{NAME}, "disableCond", "");
$disable = $disable || eval ($disableCond); $disable = $disable || eval ($disableCond);
$@ =~ s/\n/ /g; Log3 ($hash, 3, "[$hash->{NAME}] " . $@) if ($@); if ($@) {
$@ =~ s/\n/ /g;
Log3 ($hash, 3, "[$hash->{NAME}] " . $@);
}
$disable = 0 if (!defined($disable)); $disable = 0 if (!defined($disable));
return $disable; return $disable;