98_help.pm: minor changes

git-svn-id: https://svn.fhem.de/fhem/trunk/fhem@15072 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
betateilchen 2017-09-16 10:44:37 +00:00
parent 3cc917f352
commit 8d4024db0e

View File

@ -71,7 +71,7 @@ sub CommandHelp {
$output = "No help found for module: $mod" unless $output; $output = "No help found for module: $mod" unless $output;
} else { } else {
$output = ''; $output = "<br/><b>Internal command:</b> $mod";
my $i; my $i;
my $f = "$modPath/docs/commandref_frame$lang.html"; my $f = "$modPath/docs/commandref_frame$lang.html";
my $skip = 1; my $skip = 1;
@ -257,7 +257,7 @@ sub cref_findInfo {
@line = split("[ \t][ \t]*", $l,4); @line = split("[ \t][ \t]*", $l,4);
last if $l =~ m/$mod/i; last if $l =~ m/$mod/i;
} }
$line[0]= (split("/",$line[0]))[1]; $line[0]= (split("/",$line[0]))[1] if $line[0] =~ /\//;
my $text = "<br/><b>Module:</b> $line[0] "; my $text = "<br/><b>Module:</b> $line[0] ";
$text .= "<b>Maintainer:</b> $line[1] "; $text .= "<b>Maintainer:</b> $line[1] ";
$text .= "<b>Forum:</b> $line[3]\n"; $text .= "<b>Forum:</b> $line[3]\n";