98_cmdalias.pm: fix case problem

git-svn-id: https://svn.fhem.de/fhem/trunk@11418 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig
2016-05-09 09:38:33 +00:00
parent 0880ba5f88
commit 73fb38c4c8

View File

@@ -36,7 +36,8 @@ cmdalias_Define($$$)
return "Bad regexp: starting with *" if($param =~ m/^\*/);
eval { qr/^$param$/ };
return "$name: Bad regexp in $param: $@" if($@);
$hash->{ALIAS} = lc($alias);
$alias = lc($alias);
$hash->{ALIAS} = $alias;
$hash->{PARAM} = $param;
$hash->{NEWCMD} = $newcmd;
$hash->{STATE} = "defined";