From Graeme Hewson: wrap the authors list in ".nf"/".fi" in the man page

and "<pre>"/"</pre>", to make sure it doesn't get word-wrapped (the
"start each line with a blank" trick doesn't work on current versions of
pod2html).

svn path=/trunk/; revision=11919
This commit is contained in:
Guy Harris 2004-09-06 20:25:36 +00:00
parent e2009b2bf8
commit 83505e59c6
1 changed files with 10 additions and 1 deletions

View File

@ -10,6 +10,13 @@ use strict;
my $subinfo=0;
my $nextline;
print "=for html <pre>\n\n";
print "=for man .nf\n\n";
$_ = <>;
s/\xef\xbb\xbf//; # Skip UTF-8 byte order mark
print unless /^\n/;
while (<>) {
if (/(.*){/) {
$subinfo = 1;
@ -22,7 +29,9 @@ while (<>) {
} elsif ($subinfo == 1) {
next;
} else {
s/^$/ /; # Make it a verbatim paragraph
print;
}
}
print "\n=for html </pre>\n";
print "\n=for man .fi\n";