summaryrefslogtreecommitdiff
path: root/appl
diff options
context:
space:
mode:
Diffstat (limited to 'appl')
-rw-r--r--appl/cmd/man2html.b6
1 files changed, 4 insertions, 2 deletions
diff --git a/appl/cmd/man2html.b b/appl/cmd/man2html.b
index f32c4fbd..033504b4 100644
--- a/appl/cmd/man2html.b
+++ b/appl/cmd/man2html.b
@@ -318,11 +318,12 @@ Global: adt {
};
header := "<HTML><HEAD>";
+initial := "";
trailer := "</BODY></HTML>";
usage()
{
- sys->fprint(stderr, "Usage: man2html [-h header] [-t trailer] file [section]\n");
+ sys->fprint(stderr, "Usage: man2html [-h header] [-i initialtext] [-t trailer] file [section]\n");
raise "fail:usage";
}
@@ -753,6 +754,7 @@ g_SH(g: ref Global, argl: list of string)
closeall(g, 1); # .SH is top-level list item
if (g.example)
g_EE(g);
+ g_fi(g);
if (g.fill && ! g.sop)
g.print("<P>");
g.print("<DT><H4>");
@@ -1359,6 +1361,6 @@ title(g: ref Global, t: string, search: int)
g.print(header+"\n");
g.print(sprint("<TITLE>Inferno's %s</TITLE>\n", demark(t)));
g.print("</HEAD>\n");
- g.print("<BODY bgcolor=\"#FFFFFF\">\n");
+ g.print("<BODY>"+initial+"\n");
}