At 2022-08-02T10:13:29-0500, G. Branden Robinson wrote:
> No, I don't think groff's man(7) is in a disordered state, it is just
> that one of the recent changes is, like its author, a little bit _too_
> irascible.
[...]
> I'll have a look and see what I can do.

Here's a patch (attached).  I haven't pushed this yet because my
regression tests are _also_ irascible, and this caused 6 of them fail.
All spuriously, I think, but nevertheless I can't push this fix without
satisfying myself that I've corrected them.

Regards,
Branden
diff --git a/tmac/an.tmac b/tmac/an.tmac
index f99213f26..6ced58a41 100644
--- a/tmac/an.tmac
+++ b/tmac/an.tmac
@@ -271,8 +271,7 @@
 .  ds an-title "\\$1\"
 .  if \\n[CT] .stringup an-title
 .  ds an-section "\\$2\"
-.  ie (\\n[.$] > 4)    .ds an-extra3 "\\$5\"
-.  el \{ .ie '\\$2'1'  .ds an-extra3 \\*[an*section1]\"
+.  ie \{ .ie '\\$2'1'  .ds an-extra3 \\*[an*section1]\"
 .  el \{ .ie '\\$2'2'  .ds an-extra3 \\*[an*section2]\"
 .  el \{ .ie '\\$2'3'  .ds an-extra3 \\*[an*section3]\"
 .  el \{ .ie '\\$2'4'  .ds an-extra3 \\*[an*section4]\"
@@ -282,7 +281,7 @@
 .  el \{ .ie '\\$2'8'  .ds an-extra3 \\*[an*section8]\"
 .  el \{ .ie '\\$2'9'  .ds an-extra3 \\*[an*section9]\"
 .  el                  .ds an-extra3 \" empty
-.  \}\}\}\}\}\}\}\}\}
+.  \}\}\}\}\}\}\}\}
 .
 .  ds an-extra1 "\\$3\"
 .  ie (\\n[.$] > 3)    .ds an-extra2 "\\$4\"
@@ -303,11 +302,12 @@
 .    rm an-msg
 .  \}
 .
-.  if '\\*[an-extra3]'' \{\
+.  ie '\\$5\\*[an-extra3]'' \{\
 .    ds an-msg .\\$0 missing fifth argument and second argument '\\$2'\"
 .    as an-msg " not a recognized manual section; specify volume title\"
 .    an-style-warn \\*[an-msg]
 .    rm an-msg
+.  el .ds an-extra3 "\\$5\"
 .  \}
 .
 .  \" Initialize environment for headers and footers.

Attachment: signature.asc
Description: PGP signature

Reply via email to