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

fhem/fhem.pl

@@ -758,7 +758,6 @@ AnalyzeCommand($$)
       }
     }
   }
-
   $fn = $cmds{$fn}{ReplacedBy}
                 if(defined($cmds{$fn}) && defined($cmds{$fn}{ReplacedBy}));
 
@@ -767,9 +766,10 @@ AnalyzeCommand($$)
   if(!defined($cmds{$fn}) || !defined($cmds{$fn}{Fn})) {
     map { $fn = $_ if(lc($fn) eq lc($_)); } keys %modules;
     $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));
   no strict "refs";
   my $ret = &{$cmds{$fn}{Fn} }($cl, $param);