2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 03:06:37 +00:00

fhem.pl: fix strange devspec2array bug (Fourm #53223)

git-svn-id: https://svn.fhem.de/fhem/trunk@11425 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2016-05-10 11:06:44 +00:00
parent 00a898f7a1
commit d8f809333c

View File

@ -2147,6 +2147,7 @@ CommandList($$)
my $first = 1; my $first = 1;
foreach my $n (@arg[1..@arg-1]) { foreach my $n (@arg[1..@arg-1]) {
my $n = $n; # Forum #53223, for some perl versions $n is a reference
my $fType=""; my $fType="";
if($n =~ m/^(.:)(.*$)/) { if($n =~ m/^(.:)(.*$)/) {
$fType = $1; $fType = $1;