mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-20 13:26:02 +00:00
98_help.pm: minor changes
git-svn-id: https://svn.fhem.de/fhem/trunk@15074 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
6314ef0778
commit
7b5b638935
@ -254,13 +254,13 @@ sub cref_findInfo {
|
|||||||
my ($l,@line);
|
my ($l,@line);
|
||||||
my ($err,@text) = FileRead({FileName => "$modPath/MAINTAINER.txt", ForceType => 'file'});
|
my ($err,@text) = FileRead({FileName => "$modPath/MAINTAINER.txt", ForceType => 'file'});
|
||||||
foreach $l (@text) {
|
foreach $l (@text) {
|
||||||
@line = split("[ \t][ \t]*", $l,4);
|
@line = split("[ \t][ \t]*", $l,3);
|
||||||
last if $l =~ m/$mod/i;
|
last if $l =~ m/$mod/i;
|
||||||
}
|
}
|
||||||
$line[0]= (split("/",$line[0]))[1] if $line[0] =~ /\//;
|
$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[2]\n";
|
||||||
$text //= '';
|
$text //= '';
|
||||||
return $text;
|
return $text;
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user