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

git-svn-id: https://svn.fhem.de/fhem/trunk@16300 2b470e98-0d58-463d-a4d8-8e2adae1ed80
2018-03-01 08:48:21 +00:00
parent 1a10712db5
commit 5ce0adc8f0
1 changed files with 1 additions and 1 deletions
--- a/fhem/FHEM/98_cmdalias.pm
+++ b/fhem/FHEM/98_cmdalias.pm
@@ -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;
    }