CC: | rra [...] stanford.edu |
Subject: | Man.pm: Eliminate warnings about an undefined register |
Date: | Wed, 29 Feb 2012 20:19:48 +0000 |
To: | bug-podlators [...] rt.cpan.org |
From: | Bjarni Ingi Gislason <bjarniig [...] rhi.hi.is> |
Eliminate warnings from "groff" about the undefined numeric
register "F". This patch could cause other implementations of
"*roff" to issue more warnings or they could define a
read-only numeric register ".g" with the value of 0.
Patch to version 2.25
--- Man.pm 2010-10-11 02:41:40.000000000 +0000
+++ Man_new.pm 2012-02-28 21:21:39.000000000 +0000
@@ -1392,17 +1392,17 @@
.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
.\" entries marked with X<> in POD. Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
-.ie \nF \{\
+.de IX
+..
+.if \(.g .if r F \{\
+.if \nF \{\
. de IX
. tm Index:\\$1\t\\n%\t"\\$2"
..
. nr % 0
. rr F
.\}
-.el \{\
-. de IX
-..
-.\}
+.if \(.g .\}
Show quoted text
----END OF PREAMBLE----
if ($accents) {
--
Bjarni I. Gislason