GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-26 22:09:26 +01:00
Code Issues Projects Releases Wiki Activity

Update man.pl to use newer manpage, and minor formatting fixes

Browse Source
This commit is contained in:
Pragmatic Software 2014-04-07 05:12:00 +00:00
parent 7367e4f18c
commit f347c6d1e3
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
PBot/VERSION.pm
View File

@ -13,7 +13,7 @@ use warnings;
# These are set automatically by the build/commit script
use constant {
BUILD_NAME => "PBot",
BUILD_REVISION => 541,
BUILD_REVISION => 542,
BUILD_DATE => "2014-04-06",
};

8
modules/man.pl
View File

@ -26,7 +26,7 @@ my $get_text;
do {
# $text = get("http://www.freebsd.org/cgi/man.cgi?query=$manpage&sektion=$section&apropos=0&manpath=FreeBSD+6.2-RELEASE&format=ascii");
$get_text = get("http://www.freebsd.org/cgi/man.cgi?query=$manpage&sektion=$section&apropos=0&manpath=SuSE+Linux%2Fi386+8.2&format=ascii");
$get_text = get("http://www.freebsd.org/cgi/man.cgi?query=$manpage&sektion=$section&apropos=0&manpath=SuSE+Linux%2Fi386+11.3&format=ascii");
$text = substr($get_text, 0, 5000);
@ -73,9 +73,9 @@ if($text =~ m/DESCRIPTION(.*?)$manpage(.*?)\./si) {
$foo =~ s/\s+/ /g;
$foo =~ s/^\s+//;
if($foo =~ /^NOTE/) {
$description = "$foo$manpage $bar";
$description = "$foo$manpage$bar";
} else {
$description = "$manpage $bar";
$description = "$manpage$bar";
}
$description =~ s/\-\s+//g;
}
@ -90,7 +90,7 @@ if ($get_text =~ m/^CONFORMING TO.*?^\s+The\s$manpage\s.*conforms to\s(.*?)$/ms)
}
$result = "";
$result .= "$name - " if (not defined $includes);
$result .= "$name - " if (not defined $includes and defined $name);
$result .= "Includes: $includes - " if (defined $includes);
$result .= "$prototype - " if (defined $prototype);