98_cmdalias.pm: use $cl (nneded by authorization) for replaced commands (Forum #85083)

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@16300 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2018-03-01 08:48:21 +00:00
parent d9d65f0c4d
commit b9fa0e84c8

View File

@ -89,7 +89,7 @@ CommandCmdAlias($$$)
my %specials= ("%EVENT" => $param);
my $exec = EvalSpecials($h->{NEWCMD}, %specials);
$h->{InExec} = 1;
my $r = AnalyzeCommandChain(undef, $exec);
my $r = AnalyzeCommandChain($cl, $exec);
delete $h->{InExec};
return $r;
}