2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2024-11-25 11:49:51 +00:00

fhem.pl: disabledForIntervals: change eval to AnalyzePerlCommand (Forum #126815)

git-svn-id: https://svn.fhem.de/fhem/trunk@25852 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2022-03-17 17:20:30 +00:00
parent 9f2da5fed1
commit d363b5a053

View File

@ -908,7 +908,7 @@ IsDisabled($)
my $dfi = $attr{$devname}{disabledForIntervals};
if(defined($dfi)) {
$dfi =~ s/{([^\x7d]*)}/$cmdFromAnalyze=$1; eval $1/ge; # Forum #69787
$dfi =~ s/{([^\x7d]*)}/AnalyzePerlCommand(undef,$1)/ge; # Forum #69787
my ($sec,$min,$hour,$mday,$month,$year,$wday,$yday,$isdst) =
localtime(gettimeofday());
my $dhms = sprintf("%s\@%02d:%02d:%02d", $wday, $hour, $min, $sec);