# The fields are:- privilege level, Language, full command name, short description
#
-my $h = new FileHandle;
+my $h = new IO::File;
if (!open($h, "$main::localcmd/Commands_$lang.hlp")) {
if (!open($h, "$main::cmd/Commands_$lang.hlp")) {
$line =~ s/![\w\/]//og;
$line =~ s/\//\.\*\//og;
+$line =~ s/^\s+//og;
+$line =~ s/\s+$//og;
+
+# sort out aliases
+my $alias = CmdAlias::get_hlp($line);
+$line = $alias if $alias;
my $include;
foreach $in (<$h>) {