xmllist won't work the first time
git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@3074 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -758,7 +758,6 @@ AnalyzeCommand($$)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
$fn = $cmds{$fn}{ReplacedBy}
|
$fn = $cmds{$fn}{ReplacedBy}
|
||||||
if(defined($cmds{$fn}) && defined($cmds{$fn}{ReplacedBy}));
|
if(defined($cmds{$fn}) && defined($cmds{$fn}{ReplacedBy}));
|
||||||
|
|
||||||
@@ -767,9 +766,10 @@ AnalyzeCommand($$)
|
|||||||
if(!defined($cmds{$fn}) || !defined($cmds{$fn}{Fn})) {
|
if(!defined($cmds{$fn}) || !defined($cmds{$fn}{Fn})) {
|
||||||
map { $fn = $_ if(lc($fn) eq lc($_)); } keys %modules;
|
map { $fn = $_ if(lc($fn) eq lc($_)); } keys %modules;
|
||||||
$fn = LoadModule($fn);
|
$fn = LoadModule($fn);
|
||||||
return "Unknown command $fn, try help" if(!defined($cmds{$fn}));
|
return "Unknown command $fn, try help" if(!defined($cmds{lc($fn)}));
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
$param = "" if(!defined($param));
|
$param = "" if(!defined($param));
|
||||||
no strict "refs";
|
no strict "refs";
|
||||||
my $ret = &{$cmds{$fn}{Fn} }($cl, $param);
|
my $ret = &{$cmds{$fn}{Fn} }($cl, $param);
|
||||||
|
|||||||
Reference in New Issue
Block a user