mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-03-14 05:46:35 +00:00
fhem.pl: EVTPARTn for n>10 fix for FHEM Commands (Forum #84463)
git-svn-id: https://svn.fhem.de/fhem/trunk@16204 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
7ed2e9e773
commit
698c36367f
@ -1116,7 +1116,7 @@ AnalyzeCommand($$;$)
|
|||||||
$cmd =~ s/^[ \t]*//;
|
$cmd =~ s/^[ \t]*//;
|
||||||
if($evalSpecials) {
|
if($evalSpecials) {
|
||||||
map { my $n = substr($_,1); my $v = $evalSpecials->{$_};
|
map { my $n = substr($_,1); my $v = $evalSpecials->{$_};
|
||||||
$cmd =~ s/\$$n/$v/g; } keys %{$evalSpecials};
|
$cmd =~ s/\$$n/$v/g; } sort { $b cmp $a } keys %{$evalSpecials};
|
||||||
$evalSpecials = undef if(!$calledFromChain || $calledFromChain ne "ACC");
|
$evalSpecials = undef if(!$calledFromChain || $calledFromChain ne "ACC");
|
||||||
}
|
}
|
||||||
my ($fn, $param) = split("[ \t][ \t]*", $cmd, 2);
|
my ($fn, $param) = split("[ \t][ \t]*", $cmd, 2);
|
||||||
|
Loading…
x
Reference in New Issue
Block a user