fhem.pl: fix $we (Forum #44621)
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@9993 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -950,8 +950,8 @@ AnalyzePerlCommand($$;$)
|
|||||||
my $we = (($wday==0 || $wday==6) ? 1 : 0);
|
my $we = (($wday==0 || $wday==6) ? 1 : 0);
|
||||||
if(!$we) {
|
if(!$we) {
|
||||||
my $h2we = $attr{global}{holiday2we};
|
my $h2we = $attr{global}{holiday2we};
|
||||||
if($h2we && $value{$h2we}) {
|
if($h2we && Value($h2we)) {
|
||||||
my ($a, $b) = ReplaceEventMap($h2we, [$h2we, $value{$h2we}], 0);
|
my ($a, $b) = ReplaceEventMap($h2we, [$h2we, Value($h2we)], 0);
|
||||||
$we = 1 if($b ne "none");
|
$we = 1 if($b ne "none");
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user